diff --git a/New/Shorewall/Chains.pm b/New/Shorewall/Chains.pm index 45d717dfd..361e2f75e 100644 --- a/New/Shorewall/Chains.pm +++ b/New/Shorewall/Chains.pm @@ -417,7 +417,7 @@ sub first_chains( $ ) #$1 = interface } # -# Split a source or destination list but keep [...] together. +# Split a source or destination host list but keep [...] together. # sub mysplit( $ ) { my @input = split /,/, $_[0]; @@ -432,7 +432,7 @@ sub mysplit( $ ) { $element .= ( ',' . shift @input ); } - fatal_error "Invalid List $_[0]" unless substr( $element, -1, 1 ) eq ']'; + fatal_error "Invalid Host List ($_[0])" unless substr( $element, -1, 1 ) eq ']'; } push @result, $element;