X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FExtMsg.pm;h=4dbefbc594c13e7edc2b18071a6c5a442404ef26;hb=49a14209678e26e31b2a9c89aec330c1a7a87b80;hp=2edd7537962a91bd06371f0805eaef841b27aedf;hpb=18a60dc227c9bc9926fd925e5219355fe2a80c98;p=spider.git

diff --git a/perl/ExtMsg.pm b/perl/ExtMsg.pm
index 2edd7537..4dbefbc5 100644
--- a/perl/ExtMsg.pm
+++ b/perl/ExtMsg.pm
@@ -95,7 +95,7 @@ sub dequeue
 			dbg("connect $conn->{cnum}: $msg") if $conn->{state} ne 'C' && isdbg('connect');
 		
 			$msg =~ s/\xff\xfa.*\xff\xf0|\xff[\xf0-\xfe].//g; # remove telnet options
-			$msg =~ s/[\x00-\x08\x0a-\x19\x1b-\x1f\x80-\x9f]/./g;         # immutable CSI sequence + control characters
+#			$msg =~ s/[\x00-\x08\x0a-\x19\x1b-\x1f\x80-\x9f]/./g;         # immutable CSI sequence + control characters
 			
 			if ($conn->{state} eq 'C') {
 				&{$conn->{rproc}}($conn, "I$conn->{call}|$msg");