diff --git a/Shorewall/Perl/Shorewall/Rules.pm b/Shorewall/Perl/Shorewall/Rules.pm index 506d1fdc3..17781ddf9 100644 --- a/Shorewall/Perl/Shorewall/Rules.pm +++ b/Shorewall/Perl/Shorewall/Rules.pm @@ -1069,7 +1069,7 @@ sub process_rule1 ( $$$$$$$$$$$$$ ) { if ( $dest eq '-' ) { $dest = join( '', $z, '::' , $ports =~ /[:,]/ ? '' : $ports ); } else { - $dest = join( '', $z, '::', $dest ) unless $dest =~ /:/; + $dest = join( '', $z, '::', $dest ) unless $dest =~ /^[^\d].*:/; } } elsif ( $action eq 'REJECT' ) { $action = 'reject';