X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FIntMsg.pm;h=95c6ac74347793ce9f38f27d8af303bbe1265930;hb=6db883c129fb84bbf067861a1def1fd8120a32c8;hp=190d0b43c49b4bcaafb8c6d62511af31d30a2270;hpb=06963a9fca5e08982934c10946b8452f13feba2c;p=spider.git diff --git a/perl/IntMsg.pm b/perl/IntMsg.pm index 190d0b43..95c6ac74 100644 --- a/perl/IntMsg.pm +++ b/perl/IntMsg.pm @@ -44,7 +44,6 @@ sub dequeue for (@lines) { if (defined $_) { s/\%([0-9A-F][0-9A-F])/chr(hex($1))/eg; - s/[\x00-\x08\x0a-\x19\x1b-\x1f\x80-\x9f]/./g; # immutable CSI sequence + control characters } else { $_ = ''; }