X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXProt.pm;h=b1d37a9b8e0e741447a2343655c0fdd2acafeec5;hb=8e6600cb1ab69aed0db1f69b482484e4831b7c16;hp=7f145114feb61ecd5a9f9c66af2a797b61fc6c7b;hpb=6aca4e461103870de99b0ce452f21cf7fedeb54b;p=spider.git diff --git a/perl/DXProt.pm b/perl/DXProt.pm index 7f145114..b1d37a9b 100644 --- a/perl/DXProt.pm +++ b/perl/DXProt.pm @@ -241,6 +241,7 @@ sub normal my ($filter, $hops) = Filter::it($dxchan->{spotfilter}, @spot) if $dxchan->{spotfilter}; if ($hops) { $line =~ s/\^H\d+\^\~$/\^H$hops\^\~/; + $routeit = $line; } else { $routeit = adjust_hops($dxchan, $line); # adjust its hop count by node name next unless $routeit; @@ -403,6 +404,7 @@ sub normal # queue mail DXMsg::queue_msg(0); + return; }