From 9c893a0e215f6ebb5a17f4ffdaa20812db5fb7c6 Mon Sep 17 00:00:00 2001 From: Tom Eastep Date: Thu, 27 Sep 2012 07:22:40 -0700 Subject: [PATCH] Restore the original calling sequences of validate_[46]net() Signed-off-by: Tom Eastep --- Shorewall/Perl/Shorewall/IPAddrs.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/Shorewall/Perl/Shorewall/IPAddrs.pm b/Shorewall/Perl/Shorewall/IPAddrs.pm index 7bd1d84be..9536aacdb 100644 --- a/Shorewall/Perl/Shorewall/IPAddrs.pm +++ b/Shorewall/Perl/Shorewall/IPAddrs.pm @@ -178,7 +178,7 @@ sub encodeaddr( $ ) { $result; } -sub validate_4net( $$; $ ) { +sub validate_4net( $$ ) { my ($net, $vlsm, $rest) = split( '/', $_[0], 3 ); my $allow_name = $_[1]; @@ -608,7 +608,7 @@ sub validate_6address( $$ ) { defined wantarray ? wantarray ? @addrs : $addrs[0] : undef; } -sub validate_6net( $$;$ ) { +sub validate_6net( $$ ) { my ($net, $vlsm, $rest) = split( '/', $_[0], 3 ); my $allow_name = $_[0];