projects
/
spider.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
a5bd8a3
)
fixed console back again
author
djk
<djk>
Mon, 1 Nov 1999 11:48:29 +0000
(11:48 +0000)
committer
djk
<djk>
Mon, 1 Nov 1999 11:48:29 +0000
(11:48 +0000)
perl/console.pl
patch
|
blob
|
history
diff --git
a/perl/console.pl
b/perl/console.pl
index a0e4f1087a676825397a46a0e2a0fb8cb19b9ff2..ceac24e278890d1275fa6f904761d1993355061e 100755
(executable)
--- a/
perl/console.pl
+++ b/
perl/console.pl
@@
-137,10
+137,9
@@
sub measure
# display the top screen
sub show_screen
{
- if ($spos
>
= @shistory - 1) {
+ if ($spos
=
= @shistory - 1) {
# if we really are scrolling thru at the end of the history
- $spos = @shistory - 1 if $spos >= @shistory;
my $line = $shistory[$spos];
$top->addstr("\n") if $spos > 0;
setattr($line);