Fix for new Macro syntax when macro name contains non-word characters

git-svn-id: https://shorewall.svn.sourceforge.net/svnroot/shorewall/trunk@8299 fbd18981-670d-0410-9b5c-8dc0c1a9a2bb
This commit is contained in:
teastep 2008-03-17 15:44:15 +00:00
parent 97efa656dc
commit c0836b8df2

View File

@ -232,7 +232,7 @@ sub get_target_param( $ ) {
my ( $target, $param ) = split '/', $_[0]; my ( $target, $param ) = split '/', $_[0];
unless ( defined $param ) { unless ( defined $param ) {
( $target, $param ) = ( $1, $2 ) if $target =~ /^(\w+)[(](.*)[)]$/; ( $target, $param ) = ( $1, $2 ) if $target =~ /^(.*?)[(](.*)[)]$/;
} }
( $target, $param ); ( $target, $param );