[project @ 2000-10-14 20:54:34 by joy]

allow more flexibility with stop, quit and refcard commands

diff --git a/scripts/service.in b/scripts/service.in
index 37fe70495dcbf0a63ce6ea6a7ba6f8c306c32081..5ee09cfc7ac4f9eb518d6fc3143e97c5457716dd 100755 (executable)
--- a/scripts/service.in
+++ b/scripts/service.in
@@ -1,5 +1,5 @@
 #!/usr/bin/perl -w
-# $Id: service.in,v 1.23 2000/10/14 11:30:35 joy Exp $
+# $Id: service.in,v 1.24 2000/10/14 20:54:34 joy Exp $
 #
 # Usage: service <code>.nn
 # Temps:  incoming/P<code>.nn
@@ -94,7 +94,7 @@ for ($procline=$i; $procline<=$#msg; $procline++)
     next unless m/\S/; next if m/^\s*\#/;
     &transcript("> $_\n");
     $action= '';
-    if (m/^stop\s/i || m/^quit\s/i || m/^--/ || m/^thank/i) 
+    if (m/^stop/i || m/^quit/i || m/^--/ || m/^thank/i) 
        {       &transcript("Stopping processing here.\n\n");
         last;
     } elsif (m/^debug\s+(\d+)$/i && $1 >= 0 && $1 <= 1000) {
@@ -194,7 +194,7 @@ for ($procline=$i; $procline<=$#msg; $procline++)
         &sendhelp;
         &transcript("\n");
         $ok++;
-    } elsif (m/^refcard$/i) {
+    } elsif (m/^refcard/i) {
         &sendtxthelp("bug-mailserver-refcard.txt","mailservers' reference card");
     } elsif (m/^subscribe/i) {
         &transcript(<<END);