You are viewing a plain text version of this content. The canonical link for it is here.
Posted to commits@vcl.apache.org by ar...@apache.org on 2015/06/30 17:14:20 UTC
svn commit: r1688471 - /vcl/trunk/managementnode/lib/VCL/Module/OS/Linux.pm
Author: arkurth
Date: Tue Jun 30 15:14:20 2015
New Revision: 1688471
URL: http://svn.apache.org/r1688471
Log:
VCL-880
Updated Linux.pm::clean_iptables to sort rule numbers numerically.
Modified:
vcl/trunk/managementnode/lib/VCL/Module/OS/Linux.pm
Modified: vcl/trunk/managementnode/lib/VCL/Module/OS/Linux.pm
URL: http://svn.apache.org/viewvc/vcl/trunk/managementnode/lib/VCL/Module/OS/Linux.pm?rev=1688471&r1=1688470&r2=1688471&view=diff
==============================================================================
--- vcl/trunk/managementnode/lib/VCL/Module/OS/Linux.pm (original)
+++ vcl/trunk/managementnode/lib/VCL/Module/OS/Linux.pm Tue Jun 30 15:14:20 2015
@@ -4490,7 +4490,7 @@ sub clean_iptables {
my $chain = "INPUT";
my @commands;
my $firewall_configuration = $self->get_firewall_configuration() || return;
- RULE: for my $rule_number (reverse sort keys %{$firewall_configuration->{$chain}}) {
+ RULE: for my $rule_number (reverse sort {$a<=>$b} keys %{$firewall_configuration->{$chain}}) {
my $rule = $firewall_configuration->{$chain}{$rule_number};
for my $protocol (keys %$rule) {