nils/gluon
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

gluon-simple-tc: initial.pl: sort keys before creating config

Browse Source
This commit is contained in:
Nils Schneider 2013-10-04 10:47:31 +02:00
parent 75ac64ca20
commit 9b69ac2845
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
package/gluon-simple-tc/initial.pl
View File

@ -6,10 +6,12 @@ print <<'END';
uci -q batch <<EOF uci -q batch <<EOF
END END
while (($name, $interface) = each %{$cfg}) { foreach my $name (sort keys %{$cfg}) {
my $interface = $cfg->{$name};
print "set gluon-simple-tc.$name=interface\n"; print "set gluon-simple-tc.$name=interface\n";
for (qw(ifname enabled limit_egress limit_ingress)) { for (qw(enabled ifname limit_egress limit_ingress)) {
print "set gluon-simple-tc.$name.$_=$interface->{$_}\n"; print "set gluon-simple-tc.$name.$_=$interface->{$_}\n";
} }
} }