From: minima Date: Tue, 8 Mar 2005 00:24:15 +0000 (+0000) Subject: delete successful pings X-Git-Tag: R_1_52~114 X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=commitdiff_plain;h=377d1ce5071669cd2d5797f5604fd5e3034bfc51;p=spider.git delete successful pings --- diff --git a/perl/Thingy/Ping.pm b/perl/Thingy/Ping.pm index 30359a42..7f1d7224 100644 --- a/perl/Thingy/Ping.pm +++ b/perl/Thingy/Ping.pm @@ -131,6 +131,7 @@ sub handle } } } + delete $ping{$ref->{id}}; } } } else {