X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FExtMsg.pm;h=4dbefbc594c13e7edc2b18071a6c5a442404ef26;hb=64d857b27904d74ad83c36c41fae1f18c43f4c54;hp=2edd7537962a91bd06371f0805eaef841b27aedf;hpb=6d4734fbc4db9f84db74e9ffd8f81cd019f6c8ea;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");