extern/shorewall_code
1
0
Fork 1
mirror of https://gitlab.com/shorewall/code.git synced 2024-11-14 03:34:31 +01:00
Code Issues Packages Projects Releases Wiki Activity

Omit warning message

Browse Source
This commit is contained in:
Tom Eastep 2010-12-01 09:21:23 -08:00
parent cdb75bfd96
commit b224eb80d5
1 changed files with 1 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
Shorewall/Perl/Shorewall/Config.pm
View File

@ -2905,13 +2905,9 @@ sub get_params() {
fatal_error "Processing of $fn failed" if $?; fatal_error "Processing of $fn failed" if $?;
my $variable;
for ( @params ) { for ( @params ) {
if ( /^export (.*?)='(.*)'$/ ) { if ( /^export (.*?)='(.*)'$/ ) {
$params{$variable = $1} = $2 unless $1 eq '_'; $params{$1} = $2 unless $1 eq '_';
} elsif ( /^export (.*?)='/ ) {
warning_message "Exported symbol '$1' ignored";
} }
} }
} }