X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?p=spider.git;a=blobdiff_plain;f=perl%2FDXLogPrint.pm;h=356c7cd1efb3dd44c9904dd587a35aaa9087e5bd;hp=8ce8e35c535492b6ec1a1dbe9f6a3176de191d08;hb=ee3201c65017b91e2e42e8792b4db7c9c1122ae5;hpb=6181396aed78196fdff45033de7b59d6a2fcd6c1

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