diff options
author | Stephen Hemminger <stephen.hemminger@vyatta.com> | 2009-03-08 14:10:29 -0700 |
---|---|---|
committer | Stephen Hemminger <stephen.hemminger@vyatta.com> | 2009-03-08 14:10:29 -0700 |
commit | 54339147b64ba930a9dd69653035cfb819fdf69c (patch) | |
tree | 90ccc851ea8e430400b88b549195f9450418619c | |
parent | 4554776575e8116353e4607acdad07afe902ba80 (diff) | |
parent | fea24d2de3efef33a080fe52f4ae9638477710a7 (diff) | |
download | vyatta-cfg-qos-54339147b64ba930a9dd69653035cfb819fdf69c.tar.gz vyatta-cfg-qos-54339147b64ba930a9dd69653035cfb819fdf69c.zip |
Merge branch 'jenner' of 192.168.100.1:git/vyatta-cfg-qos into jenner
-rwxr-xr-x | scripts/vyatta-qos.pl | 10 |
1 files changed, 7 insertions, 3 deletions
diff --git a/scripts/vyatta-qos.pl b/scripts/vyatta-qos.pl index 0547b4b..4245e5e 100755 --- a/scripts/vyatta-qos.pl +++ b/scripts/vyatta-qos.pl @@ -94,9 +94,13 @@ sub list_policy { $config->setLevel('qos-policy'); while ( my $direction = shift ) { - my @types = - grep { defined $policies{$direction}{$_} } $config->listNodes(); - print join( ' ', @types ); + my @qos = grep { $policies{$direction}{$_} } $config->listNodes(); + my @names = (); + foreach my $type (@qos) { + my @n = $config->listNodes($type); + push @names, @n; + } + print join( ' ', @names ), "\n"; } } |