From 8e6600cb1ab69aed0db1f69b482484e4831b7c16 Mon Sep 17 00:00:00 2001 From: djk Date: Sun, 25 Apr 1999 15:57:51 +0000 Subject: [PATCH] fixed the fact that the filter works, but the DXProt didn't send it onx --- perl/DXProt.pm | 1 + 1 file changed, 1 insertion(+) diff --git a/perl/DXProt.pm b/perl/DXProt.pm index 6d9afb4e..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; -- 2.43.0