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 8959245375
commit 4e33efd8a6

View File

@ -1072,7 +1072,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';