From: minima <minima>
Date: Sat, 3 Mar 2001 20:46:17 +0000 (+0000)
Subject: more cleanups
X-Git-Tag: R_1_47~149
X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=commitdiff_plain;h=ba49813ff2ce03b9b92c16810f74afeae10c28ca;p=spider.git

more cleanups
---

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 {