X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FEphMsg.pm;h=a6da8a2df2b54962f69dfa8e6e0c0a1726f52277;hb=c02dc2d8b544b9d682c9a068ba13bdedf40ed3bf;hp=0814df84d7288d5a21f0775d4b7f3c556e00d178;hpb=7c7080ad7019d6e23a8ad401256122e81fa03a5a;p=spider.git diff --git a/perl/EphMsg.pm b/perl/EphMsg.pm index 0814df84..a6da8a2d 100644 --- a/perl/EphMsg.pm +++ b/perl/EphMsg.pm @@ -45,7 +45,7 @@ sub dequeue my $conn = shift; my $msg; - if ($conn->{csort} eq 'ax25' && exists $conn->{msg}) { + if ($conn->ax25 && exists $conn->{msg}) { $conn->{msg} =~ s/\cM/\cJ/g; }