X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FConsole.pm;h=9812a024442b21cc7b5fc934bbdd2c2694988fce;hb=e3beb3c736ca8e9ac9665d5c55f5d0f3cdb3f783;hp=a50bcf5e807e06a8375c4a4f6eecc733bb9370d1;hpb=f155969d600561b9ef151a7ce2494a0c89aed033;p=spider.git

diff --git a/perl/Console.pm b/perl/Console.pm
index a50bcf5e..9812a024 100644
--- a/perl/Console.pm
+++ b/perl/Console.pm
@@ -34,7 +34,7 @@ package main;
 $maxkhist = 100;
 $maxshist = 500;
 if ($ENV{'TERM'} =~ /(xterm|ansi)/) {
-	$ENV{'TERM'} = 'color_xterm';
+#	$ENV{'TERM'} = 'color_xterm';
 	$foreground = COLOR_BLACK();
 	$background = COLOR_WHITE();
 	$mycallcolor = COLOR_PAIR(1);