holm/shorewall_code
1
0
Fork 0
forked from extern/shorewall_code
Code Pull Requests Activity

Sort emitted param settings in export_params()

Browse Source 
Signed-off-by: Tom Eastep <teastep@shorewall.net>
This commit is contained in:
Tom Eastep 2012-02-05 10:03:47 -08:00
parent 8561bb77ee
commit e8875ae50b
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -3476,11 +3476,13 @@ sub add_param( $$ ) {
sub export_params() { sub export_params() {
my $count = 0; my $count = 0;
while ( my ( $param, $value ) = each %params ) { for my $param ( sort keys %params ) {
# #
# Don't export params added by the compiler # Don't export params added by the compiler
# #
next if exists $compiler_params{$param}; next if exists $compiler_params{$param};
my $value = $params{$param};
# #
# Values in %params are generated from the output of 'export -p'. # Values in %params are generated from the output of 'export -p'.
# The different shells have different conventions for delimiting # The different shells have different conventions for delimiting