From 8d0dba349c52d7b906243b623b9ed96231351263 Mon Sep 17 00:00:00 2001 From: Tom Eastep Date: Mon, 4 Mar 2024 12:10:56 -0800 Subject: [PATCH] Shorten DBL exclusion chain names Signed-off-by: Tom Eastep --- Shorewall/Perl/Shorewall/Chains.pm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/Shorewall/Perl/Shorewall/Chains.pm b/Shorewall/Perl/Shorewall/Chains.pm index 577262c45..b8dd3ee39 100644 --- a/Shorewall/Perl/Shorewall/Chains.pm +++ b/Shorewall/Perl/Shorewall/Chains.pm @@ -2446,7 +2446,7 @@ sub output_option_chain($) { # sub nodbl_src_chain($) { my $interface = shift; - ( $config{USE_PHYSICAL_NAMES} ? chain_base( get_physical( $interface ) ) : get_logical( $interface ) ) . '_nosbl'; + ( $config{USE_PHYSICAL_NAMES} ? chain_base( get_physical( $interface ) ) : get_logical( $interface ) ) . '_nobl'; } # @@ -2454,7 +2454,7 @@ sub nodbl_src_chain($) { # sub nodbl_dst_chain($) { my $interface = shift; - ( $config{USE_PHYSICAL_NAMES} ? chain_base( get_physical( $interface ) ) : get_logical( $interface ) ) . '_nodbl'; + ( $config{USE_PHYSICAL_NAMES} ? chain_base( get_physical( $interface ) ) : get_logical( $interface ) ) . '_ndbl'; } # @@ -2462,7 +2462,7 @@ sub nodbl_dst_chain($) { # sub nodbl_classic_chain($) { my $interface = shift; - ( $config{USE_PHYSICAL_NAMES} ? chain_base( get_physical( $interface ) ) : get_logical( $interface ) ) . '_nocbl'; + ( $config{USE_PHYSICAL_NAMES} ? chain_base( get_physical( $interface ) ) : get_logical( $interface ) ) . '_ncbl'; } #