Restore wildcard properties to zone lists

This commit is contained in:
Tom Eastep 2010-08-24 06:52:53 -07:00
parent 5a92c3262f
commit 383e792807

View File

@ -1570,6 +1570,7 @@ sub build_zone_list( $$$\$\$ ) {
} elsif ( $input =~ /^([^:]+,[^:]+)(:.*)?$/ ) { } elsif ( $input =~ /^([^:]+,[^:]+)(:.*)?$/ ) {
$input = $1; $input = $1;
$rest = $2; $rest = $2;
$$wildref = 1;
$$intrazoneref = ( $input =~ s/\+$// ); $$intrazoneref = ( $input =~ s/\+$// );