diff options
| -rw-r--r-- | lib/Vyatta/Qos/RateLimiter.pm | 4 | ||||
| -rwxr-xr-x | scripts/vyatta-qos.pl | 14 |
2 files changed, 9 insertions, 9 deletions
diff --git a/lib/Vyatta/Qos/RateLimiter.pm b/lib/Vyatta/Qos/RateLimiter.pm index 625db62..e9e29e7 100644 --- a/lib/Vyatta/Qos/RateLimiter.pm +++ b/lib/Vyatta/Qos/RateLimiter.pm @@ -21,7 +21,7 @@ package Vyatta::Qos::RateLimiter; use strict; use warnings; -use VyattaConfig; +use Vyatta::Config; use Vyatta::Qos::Util qw/getRate getTime/; my %fields = ( @@ -58,7 +58,7 @@ sub commands { sub isChanged { my ($self, $name) = @_; - my $config = new VyattaConfig; + my $config = new Vyatta::Config; $config->setLevel("qos-policy rate-limit $name"); foreach my $attr ('bandwidth', 'burst', 'latency') { diff --git a/scripts/vyatta-qos.pl b/scripts/vyatta-qos.pl index 9b1253e..10f8610 100755 --- a/scripts/vyatta-qos.pl +++ b/scripts/vyatta-qos.pl @@ -15,7 +15,7 @@ # **** End License **** use lib "/opt/vyatta/share/perl5"; -use VyattaConfig; +use Vyatta::Config; use strict; use Getopt::Long; @@ -86,7 +86,7 @@ sub make_policy { ## list defined qos policy names sub list_policy { my $direction = shift; - my $config = new VyattaConfig; + my $config = new Vyatta::Config; my @nodes = (); $config->setLevel('qos-policy'); @@ -121,7 +121,7 @@ sub delete_interface { # update policy to interface sub update_interface { my ($interface, $direction, $name ) = @_; - my $config = new VyattaConfig; + my $config = new Vyatta::Config; $config->setLevel('qos-policy'); foreach my $type ( $config->listNodes() ) { @@ -222,7 +222,7 @@ my %interfaceVifUsing = ( sub interfaces_using { my ($name) = @_; - my $config = new VyattaConfig; + my $config = new Vyatta::Config; my @affected = (); $config->setLevel('interfaces'); @@ -294,7 +294,7 @@ sub delete_policy { } sub check_conflict { - my $config = new VyattaConfig; + my $config = new Vyatta::Config; my %other = (); $config->setLevel("qos-policy"); @@ -309,14 +309,14 @@ sub check_conflict { sub create_policy { my ($shaper, $name) = @_; - my $config = new VyattaConfig; + my $config = new Vyatta::Config; # Syntax check make_policy($config, $shaper, $name); } sub apply_changes { - my $config = new VyattaConfig; + my $config = new Vyatta::Config; $config->setLevel('qos-policy'); foreach my $policy ($config->listNodes()) { |