X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;ds=sidebyside;f=perl%2FDXMsg.pm;h=f9ede90c4c167f9445019e243dc346d7bd565cfc;hb=4f444f8dd0c7a7bf53a8d40e4e0fbadf57d32ffb;hp=58c548a22ac19e000bdc417d3e9091b3c351ca89;hpb=29ec5bb85c591182dd868e7a3d87f510d7b47e9b;p=spider.git

diff --git a/perl/DXMsg.pm b/perl/DXMsg.pm
index 58c548a2..f9ede90c 100644
--- a/perl/DXMsg.pm
+++ b/perl/DXMsg.pm
@@ -212,6 +212,7 @@ sub process
 		if ($pcno == 29) {		# incoming text
 			my $ref = $work{"$f[2]$f[3]"};
 			if ($ref) {
+				$f[4] =~ s/\%5E/^/g;
 				push @{$ref->{lines}}, $f[4];
 				$ref->{count}++;
 				if ($ref->{count} >= $ref->{linesreq}) {