From 2009a66bb546a1cd3fd57c3437671af5b64dd1f5 Mon Sep 17 00:00:00 2001 From: Tom Eastep Date: Fri, 28 Dec 2012 08:04:06 -0800 Subject: [PATCH] Avoid invalid function name for starting an optional interface Signed-off-by: Tom Eastep --- Shorewall/Perl/Shorewall/Providers.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/Shorewall/Perl/Shorewall/Providers.pm b/Shorewall/Perl/Shorewall/Providers.pm index c57710b71..410b0779f 100644 --- a/Shorewall/Perl/Shorewall/Providers.pm +++ b/Shorewall/Perl/Shorewall/Providers.pm @@ -1281,8 +1281,8 @@ sub process_providers( $ ) { # for ( grep interface_is_optional( $_ ) && ! $provider_interfaces{ $_ }, all_real_interfaces ) { # - # TABLE NUMBER MARK DUPLICATE INTERFACE GATEWAY OPTIONS COPY - $currentline = "$_ 0 - - $_ - - -"; + # TABLE NUMBER MARK DUPLICATE INTERFACE GATEWAY OPTIONS COPY + $currentline = chain_base($_) ." 0 - - $_ - - -"; # $pseudoproviders += process_a_provider(1); }