X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXMsg.pm;h=174a98a4792697ee7513f8298c03e7710b97d671;hb=17b1614af3840c2c74bee181290eb094f8ed4a00;hp=38d89bbc7d4b772c5c985ac3f9b73b4a72cf5a3f;hpb=811077a3d45e4f89012a9169061745b0b42fe97b;p=spider.git diff --git a/perl/DXMsg.pm b/perl/DXMsg.pm index 38d89bbc..174a98a4 100644 --- a/perl/DXMsg.pm +++ b/perl/DXMsg.pm @@ -216,7 +216,7 @@ sub handle_29 my $ref = get_fwq($fromnode, $stream); if ($ref) { - $_[4] =~ s/\%5E/^/g; + $_[4] =~ s/\%5E/~/g; if (@{$ref->{lines}}) { push @{$ref->{lines}}, $_[4]; } else {