extern/shorewall_code
1
0
Fork 1
mirror of https://gitlab.com/shorewall/code.git synced 2025-06-21 10:18:58 +02:00
Code Issues Packages Projects Releases Wiki Activity

Change an error message

Browse Source 
git-svn-id: https://shorewall.svn.sourceforge.net/svnroot/shorewall/trunk@5653 fbd18981-670d-0410-9b5c-8dc0c1a9a2bb
This commit is contained in:
teastep 2007-03-24 15:03:23 +00:00
parent a64b9b86f4
commit 6f40ceabf1
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
New/Shorewall/Chains.pm
View File

@ -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( $ ) { sub mysplit( $ ) {
my @input = split /,/, $_[0]; my @input = split /,/, $_[0];
@ -432,7 +432,7 @@ sub mysplit( $ ) {
$element .= ( ',' . shift @input ); $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; push @result, $element;