summaryrefslogtreecommitdiff
path: root/scripts/vyatta-qos.pl
diff options
context:
space:
mode:
authorStephen Hemminger <stephen.hemminger@vyatta.com>2008-11-24 15:05:14 -0800
committerStephen Hemminger <stephen.hemminger@vyatta.com>2008-11-24 15:05:14 -0800
commita5a4824be584431805317dbd40a0aa1957bd54bb (patch)
tree6f8461d39820b7f4291536cfd6b5dd0b0960c05c /scripts/vyatta-qos.pl
parent1962b4d7d72833479789d29622ef5ce2c2f4662f (diff)
downloadvyatta-cfg-qos-a5a4824be584431805317dbd40a0aa1957bd54bb.tar.gz
vyatta-cfg-qos-a5a4824be584431805317dbd40a0aa1957bd54bb.zip
Change VyattaConfig to Vyatta::Config
Diffstat (limited to 'scripts/vyatta-qos.pl')
-rwxr-xr-xscripts/vyatta-qos.pl14
1 files changed, 7 insertions, 7 deletions
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()) {