From 112330b99f5826a16ee9924fda7f4ee79e41352c Mon Sep 17 00:00:00 2001 From: Peter Palfrader Date: Fri, 11 Jun 2004 06:48:06 +0000 Subject: Fix use of an illegal filedescriptor when we know of a remailer, but do not have keys for it yet/anymore. --- Echolot/Storage/File.pm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'Echolot') diff --git a/Echolot/Storage/File.pm b/Echolot/Storage/File.pm index 0325458..e0a0623 100644 --- a/Echolot/Storage/File.pm +++ b/Echolot/Storage/File.pm @@ -515,13 +515,13 @@ sub get_pings($$$$$) { my $fh = $self->get_ping_fh($remailer_addr, $type, $key, $direction, 1); (defined $fh) or - Echolot::Log::cluck ("$remailer_addr; type=$type; key=$key has no assigned filehandle for out pings."), + Echolot::Log::cluck ("$remailer_addr; type=$type; key=$key has no assigned filehandle for out pings."); ($fh == -1) and - Echolot::Log::info ("$remailer_addr; type=$type; key=$key has no assigned filehandle for $direction pings (key has expired)."), + Echolot::Log::info ("$remailer_addr; type=$type; key=$key has no assigned filehandle for $direction pings (key has expired, or not available yet)."), return (); seek($fh, 0, SEEK_SET) or - Echolot::Log::warn("Cannot seek to start of $remailer_addr type $type key $key direction $direction pings: $!."), + Echolot::Log::warn("Cannot seek to start of $remailer_addr type $type key $key direction $direction pings: $! ($fh)."), return undef; if ($direction eq 'out') { -- cgit v1.2.3