From: minima Date: Wed, 18 Jan 2006 11:01:34 +0000 (+0000) Subject: fix spurious extra line from previous year X-Git-Tag: R_1_52~18 X-Git-Url: http://www.dxcluster.org/gitweb/gitweb.cgi?p=spider.git;a=commitdiff_plain;h=30f494a3b6c8afe150d3852d351e3363d3f119c4 fix spurious extra line from previous year --- diff --git a/perl/DXLogPrint.pm b/perl/DXLogPrint.pm index 8ce8e35c..356c7cd1 100644 --- a/perl/DXLogPrint.pm +++ b/perl/DXLogPrint.pm @@ -84,7 +84,7 @@ sub print return ("Log search error", $@) if $@; @in = ($ring->readall, @in); - last L1 if @in > $tot; + last L1 if @in >= $tot; } $fh = $fcb->openprev(); # get the next file