fixed the fact that the filter works, but the DXProt didn't send it onx

[spider.git] / perl / DXProt.pm

diff --git a/perl/DXProt.pm b/perl/DXProt.pm
index 7f145114feb61ecd5a9f9c66af2a797b61fc6c7b..b1d37a9b8e0e741447a2343655c0fdd2acafeec5 100644 (file)
--- 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;
                }