]> www.dxcluster.org Git - spider.git/commitdiff
try again
authorminima <minima>
Mon, 7 Mar 2005 23:36:39 +0000 (23:36 +0000)
committerminima <minima>
Mon, 7 Mar 2005 23:36:39 +0000 (23:36 +0000)
perl/Thingy/Ping.pm

index 14c4ea6a2ff045b34f105786dc449f0672d9b23f..f61aafbe996e375845ef24ff6f2d1c22b1b2c2cf 100644 (file)
@@ -98,7 +98,7 @@ sub handle
                } else {
 
                        # it's a reply, look in the ping list for this one
-                       my $ref = $ping{$thing->{id}} if $thing->{id}
+                       my $ref = $ping{$thing->{id}} if exists $thing->{id};
                        $ref ||= $thing->find;
                        if ($ref) {
                                my $t = tv_interval($thing->{t}, [ gettimeofday ]);