extern/shorewall_code
1
0
Fork 1
mirror of https://gitlab.com/shorewall/code.git synced 2025-06-05 01:07:08 +02:00
Code Issues Packages Projects Releases Wiki Activity

A couple of nits

Browse Source 
git-svn-id: https://shorewall.svn.sourceforge.net/svnroot/shorewall/trunk@5473 fbd18981-670d-0410-9b5c-8dc0c1a9a2bb
This commit is contained in:
teastep 2007-03-09 04:54:47 +00:00
parent 3b6df009f2
commit 1b32a82a3d
1 changed files with 2 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
New/compiler.pl
View File

@ -783,7 +783,7 @@ sub dump_zone_info()
my $zoneref = $zones{$zone};
my $typeref = $zoneref->{hosts};
my $optionref = $zoneref->{options};
my $zonetype = $zoneref->{type};
my $zonetype = $zoneref->{type};
print "Zone: $zone\n";
@ -804,10 +804,7 @@ sub dump_zone_info()
print " Complex: $optionref->{$opttype}\n";
} else {
print " $opttype:\n";
for my $option ( keys %{$optionref->{$opttype}}) {
my $val = $optionref->{$opttype}{$option};
print " $option=$val\n";
}
while ( my ( $option, $val ) = each %{$optionref->{$opttype}} ) { print " $option=$val\n"; }
}
}
}