X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FConsole.pm;h=4dc72d4279ef0389100bfc75d08026de2fa385da;hb=38aa5af305ed46fcf56f4624eb6bac29afaccda5;hp=a6dc6613502bc3207fb6f55c787bb0867edbcf6a;hpb=d17f05b19fac36a0a8a2f828912a1a7ebefae79f;p=spider.git diff --git a/perl/Console.pm b/perl/Console.pm index a6dc6613..4dc72d42 100644 --- a/perl/Console.pm +++ b/perl/Console.pm @@ -31,6 +31,9 @@ package main; +use vars qw($maxkhist $maxshist $foreground $background $mycallcolor @colors ); +use Curses; + $maxkhist = 100; $maxshist = 500; if ($ENV{'TERM'} =~ /(xterm|ansi)/) {