From b97267962689eed8dd11afecd2d160def3c93dc6 Mon Sep 17 00:00:00 2001
From: Stephen Hemminger <stephen.hemminger@vyatta.com>
Date: Wed, 7 Jul 2010 20:05:46 -0700
Subject: Fix error handling for rate limiter

If bandwidth not defined for rate limiter policy, the error message
should come from policy (not perl error checking).
---
 lib/Vyatta/Qos/RateLimiter.pm | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

(limited to 'lib/Vyatta')

diff --git a/lib/Vyatta/Qos/RateLimiter.pm b/lib/Vyatta/Qos/RateLimiter.pm
index ac0cd2c..d4b3f95 100644
--- a/lib/Vyatta/Qos/RateLimiter.pm
+++ b/lib/Vyatta/Qos/RateLimiter.pm
@@ -36,8 +36,9 @@ sub new {
     my $class = ref($that) || $that;
     my $self = {%fields};
 
-    $self->{_rate} = getRate($config->returnValue("bandwidth"));
-    defined $self->{_rate}  or die "$level bandwidth not defined\n";
+    my $bw = config->returnValue("bandwidth");
+    defined $bw  or die "$level bandwidth not defined\n";
+    $self->{_rate} = getRate($bw);
 
     $self->{_burst}     = $config->returnValue("burst");
     defined $self->{_burst}  or die "$level burst not defined\n";
-- 
cgit v1.2.3