X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;ds=sidebyside;f=perl%2FConsole.pm;h=9812a024442b21cc7b5fc934bbdd2c2694988fce;hb=aff34665f8f175d135270f9e49c110bcce90e7b8;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);