From 82d29738bd169b47611aa0247516e2f7569f6471 Mon Sep 17 00:00:00 2001
From: Stephen Hemminger <stephen.hemminger@vyatta.com>
Date: Wed, 30 Jan 2008 14:29:19 -0800
Subject: format id for default class correctly

Forgot to hexify the value. Tc takes classnames in hex.
---
 scripts/VyattaQosTrafficShaper.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'scripts/VyattaQosTrafficShaper.pm')

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) {
-- 
cgit v1.2.3