fix ^ convertion in command mode dx

[spider.git] / perl / Aranea.pm

diff --git a/perl/Aranea.pm b/perl/Aranea.pm
index 3fb2807290945e3234a61b143d2087203899e2a9..3a2190e7389ccabfe697172d615245594a4db180 100644 (file)
--- a/perl/Aranea.pm
+++ b/perl/Aranea.pm
@@ -307,7 +307,7 @@ sub tencode
 {
        my $s = shift;
        $s =~ s/([\%=|,\'\x00-\x1f\x7f-\xff])/sprintf("%%%02X", ord($1))/eg; 
-       $s = "'$s'" if $s =~ / /;
+#      $s = "'$s'" if $s =~ / /;
        return $s;
 }