From: minima Date: Wed, 7 Nov 2001 00:02:10 +0000 (+0000) Subject: a better way of doing newlines? should make the console pastable again. X-Git-Tag: R_1_49~20 X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=commitdiff_plain;h=5b16fd51941f17c26f8acaa35183cb8d407d16bc;p=spider.git a better way of doing newlines? should make the console pastable again. --- 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; }