X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXProt.pm;h=73fcfc54ad42156d339db25f7e282a532fd606ce;hb=66f3d6d287eaf6ca0dbe9cc12dac023309383924;hp=a607b4094151155fb7edd7553c435ae0e08f2d34;hpb=bdea2174f3035fb9b75858dc1d6e2be47b1e8fc1;p=spider.git diff --git a/perl/DXProt.pm b/perl/DXProt.pm index a607b409..73fcfc54 100644 --- a/perl/DXProt.pm +++ b/perl/DXProt.pm @@ -725,7 +725,7 @@ sub normal if ($pcno == 49 || $field[1] eq $main::mycall) { DXMsg::process($self, $line); } else { - $self->route($field[1], $line); + $self->route($field[1], $line) unless $self->is_clx; } return; }