From ba49813ff2ce03b9b92c16810f74afeae10c28ca Mon Sep 17 00:00:00 2001 From: minima Date: Sat, 3 Mar 2001 20:46:17 +0000 Subject: [PATCH] more cleanups --- perl/winclient.pl | 1 + 1 file changed, 1 insertion(+) diff --git a/perl/winclient.pl b/perl/winclient.pl index 55c87992..a8188b9d 100755 --- a/perl/winclient.pl +++ b/perl/winclient.pl @@ -77,6 +77,7 @@ if ($childpid) { my ($sort, $call, $line) = $msg =~ /^(\w)([^\|]+)\|(.*)$/; if ($sort eq 'Z') { kill 'TERM', $childpid; + exit(0); } elsif ($sort eq 'E' || $sort eq 'B') { ; } else { -- 2.43.0