From 773b7d7544bc4c597acfa99e85893a4a90add095 Mon Sep 17 00:00:00 2001
From: minima <minima>
Date: Mon, 7 Mar 2005 23:36:39 +0000
Subject: [PATCH] try again

---
 perl/Thingy/Ping.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/perl/Thingy/Ping.pm b/perl/Thingy/Ping.pm
index 14c4ea6a..f61aafbe 100644
--- a/perl/Thingy/Ping.pm
+++ b/perl/Thingy/Ping.pm
@@ -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 ]);
-- 
2.34.1