diff options
| author | Peter Palfrader <peter@palfrader.org> | 2002-06-13 15:26:50 +0000 |
|---|---|---|
| committer | Peter Palfrader <peter@palfrader.org> | 2002-06-13 15:26:50 +0000 |
| commit | af0da7ef3f2ae41db3bbdd49e022c64f11f70417 (patch) | |
| tree | eb14e9a330a06130ab3fbeb162255c2a650bcedc /Echolot/Pinger.pm | |
| parent | 2824e0a5d35a08893c3b552ce3725782f98f66ef (diff) | |
Removed debug prints
Diffstat (limited to 'Echolot/Pinger.pm')
| -rw-r--r-- | Echolot/Pinger.pm | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/Echolot/Pinger.pm b/Echolot/Pinger.pm index 40e864a..0ca1ae6 100644 --- a/Echolot/Pinger.pm +++ b/Echolot/Pinger.pm @@ -1,7 +1,7 @@ package Echolot::Pinger; # (c) 2002 Peter Palfrader <peter@palfrader.org> -# $Id: Pinger.pm,v 1.4 2002/06/11 11:05:52 weasel Exp $ +# $Id: Pinger.pm,v 1.5 2002/06/13 15:26:50 weasel Exp $ # =pod @@ -111,17 +111,14 @@ sub receive($$$) { (defined $sent ? $sent : 'undef') . ':' . (defined $mac ? $mac : 'undef') . ':'; - print "Foo\n"; (defined $addr && defined $type && defined $key && defined $sent && defined $mac) or warn ("Received ping at $timestamp has undefined values: $cleanstring\n"), #FIXME: logging return 0; - print "Foo\n"; Echolot::Tools::verify_mac($addr.':'.$type.':'.$key.':'.$sent, $mac) or warn ("Received ping at $timestamp has wrong mac; $cleanstring\n"), #FIXME: logging return 0; - print "Foo\n"; Echolot::Globals::get()->{'storage'}->register_pingdone($addr, $type, $key, $sent, $now - $sent) or return 0; |