diff options
| author | Stephen Hemminger <stephen.hemminger@vyatta.com> | 2008-01-30 14:29:19 -0800 |
|---|---|---|
| committer | Stephen Hemminger <stephen.hemminger@vyatta.com> | 2008-01-30 14:29:19 -0800 |
| commit | 82d29738bd169b47611aa0247516e2f7569f6471 (patch) | |
| tree | 2ce2cb04ebd9f926ed96a851f1dc911663cc7094 /scripts/VyattaQosTrafficShaper.pm | |
| parent | 8e96d1f6674c3649aa2c8266352f9909ed011b81 (diff) | |
| download | vyatta-cfg-qos-82d29738bd169b47611aa0247516e2f7569f6471.tar.gz vyatta-cfg-qos-82d29738bd169b47611aa0247516e2f7569f6471.zip | |
format id for default class correctly
Forgot to hexify the value. Tc takes classnames in hex.
Diffstat (limited to 'scripts/VyattaQosTrafficShaper.pm')
| -rw-r--r-- | scripts/VyattaQosTrafficShaper.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/scripts/VyattaQosTrafficShaper.pm b/scripts/VyattaQosTrafficShaper.pm index 903aeeb..9bbd899 100644 --- a/scripts/VyattaQosTrafficShaper.pm +++ b/scripts/VyattaQosTrafficShaper.pm @@ -171,7 +171,8 @@ sub commands { my $classes = $self->{_classes}; my @tc = ( ); - print {$out} "qdisc add dev $dev root handle 1: htb default $defaultId\n"; + print {$out} "qdisc add dev $dev root handle 1: htb default " + . sprintf("%04x",$defaultId) . "\n"; print {$out} "class add dev $dev parent 1: classid 1:1 htb rate $rate\n"; foreach my $class (@$classes) { |