From cbc0ea6ad2d285af98c9850cebc41cc4a1db7ff9 Mon Sep 17 00:00:00 2001
From: joy <>
Date: Fri, 6 Oct 2000 19:31:46 -0800
Subject: [PATCH] [project @ 2000-10-06 20:31:46 by joy] allow everything
 starting with thank

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

diff --git a/scripts/service.in b/scripts/service.in
index 4daff161..931cc283 100755
--- a/scripts/service.in
+++ b/scripts/service.in
@@ -1,5 +1,5 @@
 #!/usr/bin/perl -w
-# $Id: service.in,v 1.16 2000/10/06 05:44:45 doogie Exp $
+# $Id: service.in,v 1.17 2000/10/06 20:31:46 joy Exp $
 #
 # Usage: service <code>.nn
 # Temps:  incoming/P<code>.nn
@@ -90,7 +90,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\s/i) 
+    if (m/^stop\s/i || m/^quit\s/i || m/^--/ || m/^thank/i) 
 	{ 	&transcript("Stopping processing here.\n\n");
         last;
     } elsif (m/^debug\s+(\d+)$/i && $1 >= 0 && $1 <= 1000) {
-- 
2.39.5