X-Git-Url: http://www.dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXLogPrint.pm;h=356c7cd1efb3dd44c9904dd587a35aaa9087e5bd;hb=30f494a3b6c8afe150d3852d351e3363d3f119c4;hp=8ce8e35c535492b6ec1a1dbe9f6a3176de191d08;hpb=59ecaaed0f74040c74cbe66557c26aa8a536ee41;p=spider.git

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