From 1a12b7745b027f55ae746359f9cd822552cf10ac Mon Sep 17 00:00:00 2001
From: cjwatson <>
Date: Thu, 27 Feb 2003 01:43:30 -0800
Subject: [PATCH] [project @ 2003-02-27 01:43:30 by cjwatson] Include
 #-comments in acknowledgements from control@bugs (#93408).

---
 scripts/service.in | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/scripts/service.in b/scripts/service.in
index eb83a106..affaecd7 100755
--- a/scripts/service.in
+++ b/scripts/service.in
@@ -1,5 +1,5 @@
 #!/usr/bin/perl
-# $Id: service.in,v 1.68 2003/02/16 15:20:26 cjwatson Exp $
+# $Id: service.in,v 1.69 2003/02/27 01:43:30 cjwatson Exp $
 # ^ more or less ^
 #
 # Usage: service <code>.nn
@@ -147,8 +147,9 @@ for ($procline=0; $procline<=$#bodylines; $procline++) {
 	 last;
     }
     $_= $bodylines[$procline]; s/\s+$//;
-    next unless m/\S/; next if m/^\s*\#/;
+    next unless m/\S/;
     &transcript("> $_\n");
+    next if m/^\s*\#/;
     $action= '';
     if (m/^stop/i || m/^quit/i || m/^--/ || m/^thank/i) {
 	&transcript("Stopping processing here.\n\n");
-- 
2.39.5