From ab38899b8ccc4c5d45f2e86affa2173d857e6ec2 Mon Sep 17 00:00:00 2001 From: teastep Date: Wed, 18 Apr 2007 16:02:09 +0000 Subject: [PATCH] Fix 'get_routed_networks' handling git-svn-id: https://shorewall.svn.sourceforge.net/svnroot/shorewall/trunk@5997 fbd18981-670d-0410-9b5c-8dc0c1a9a2bb --- Shorewall-perl/Shorewall/Chains.pm | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/Shorewall-perl/Shorewall/Chains.pm b/Shorewall-perl/Shorewall/Chains.pm index 628cb5e45..5221fa16d 100644 --- a/Shorewall-perl/Shorewall/Chains.pm +++ b/Shorewall-perl/Shorewall/Chains.pm @@ -904,7 +904,6 @@ sub match_orig_dest ( $ ) { } } - # # Match Source IPSEC # @@ -1090,9 +1089,9 @@ sub get_interface_nets ( $ ) { my $variable = interface_nets( $interface ); if ( interface_is_optional $interface ) { - $interfaceaddr{$interface} = qq($variable=\$(get_routed_networks $interface)\n); + $interfacenets{$interface} = qq($variable=\$(get_routed_networks $interface)\n); } else { - $interfaceaddr{$interface} = qq($variable=\$(get_routed_networks $interface) + $interfacenets{$interface} = qq($variable=\$(get_routed_networks $interface) [ -n "\$$variable" ] || fatal_error "Unable to determine the routes through interface \\"$interface\\"" ); }