X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2Fclient.pl;h=f159ee79ed200153d39cf0e9b01631a9aadec35d;hb=923eb0fbe7e3dc483338c6f2754ab6f413f89c95;hp=57a5d45b0fa4ea373ac434a08d9c2b623687febe;hpb=04ff9a5a6bf8f3ab55bc2922b76a44e2798af8ee;p=spider.git

diff --git a/perl/client.pl b/perl/client.pl
index 57a5d45b..f159ee79 100755
--- a/perl/client.pl
+++ b/perl/client.pl
@@ -82,8 +82,8 @@ sub sig_chld
 	unless ($^O =~ /^MS/i) {
 		$SIG{CHLD} = \&sig_chld;
 		$waitedpid = wait;
+		dbg('connect', "caught $waitedpid");
 	}
-	dbg('connect', "caught $pid");
 }