X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2Fconsole.pl;h=df524beb140241de71b4e19265fc88d25281fb33;hb=5b16fd51941f17c26f8acaa35183cb8d407d16bc;hp=fd033d90d66cb704d9efcb939344bbeac5522ab0;hpb=b672afe940f843351af2bc4a87b4c4239f3a5140;p=spider.git

diff --git a/perl/console.pl b/perl/console.pl
index fd033d90..df524beb 100755
--- a/perl/console.pl
+++ b/perl/console.pl
@@ -190,8 +190,9 @@ sub show_screen
 			my $line = $shistory[$p];
 			my $lines = measure($line);
 			last if $i + $lines > $pagel;
+			$top->addstr("\n") if $i;
 			setattr($line);
-			$top->addstr($i, 0, "$line\n");
+			$top->addstr($line);
 			$top->attrset(COLOR_PAIR(0)) if $has_colors;
 			$i += $lines;
 		}