Allow :random to work with REDIRECT

Signed-off-by: Tom Eastep <teastep@shorewall.net>
This commit is contained in:
Tom Eastep 2010-07-22 07:26:38 -07:00
parent 598949b8f4
commit 69d7c9bce7

View File

@ -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';