]> dxcluster.org Git - spider.git/commitdiff
remove warning message about exiting a subroutine via next
authorminima <minima>
Thu, 9 Aug 2001 10:42:21 +0000 (10:42 +0000)
committerminima <minima>
Thu, 9 Aug 2001 10:42:21 +0000 (10:42 +0000)
perl/DXProt.pm

index 966f0eefb0d88f4a5f4d7d8a105329542deef3df..b14b8102e4c2c5962c93381991c06eb989076027 100644 (file)
@@ -1243,7 +1243,7 @@ sub send_prot_line
                $routeit =~ s/\^H\d+\^\~$/\^H$hops\^\~/;
        } else {
                $routeit = adjust_hops($self, $line);  # adjust its hop count by node name
-               next unless $routeit;
+               return unless $routeit;
        }
        if ($filter) {
                $self->send($routeit) if $routeit;