summaryrefslogtreecommitdiff
path: root/scripts/VyattaQosTrafficShaper.pm
diff options
context:
space:
mode:
Diffstat (limited to 'scripts/VyattaQosTrafficShaper.pm')
-rw-r--r--scripts/VyattaQosTrafficShaper.pm6
1 files changed, 4 insertions, 2 deletions
diff --git a/scripts/VyattaQosTrafficShaper.pm b/scripts/VyattaQosTrafficShaper.pm
index 1c35ba2..bb0afbd 100644
--- a/scripts/VyattaQosTrafficShaper.pm
+++ b/scripts/VyattaQosTrafficShaper.pm
@@ -203,12 +203,12 @@
}
package VyattaQosTrafficShaper;
-@ISA = qw/VyattaQosPolicy/;
use strict;
require VyattaConfig;
use VyattaQosUtil;
my %fields = (
+ _name => undef,
_rate => undef,
_classes => undef,
);
@@ -216,11 +216,13 @@ my %fields = (
# new VyattaQosTrafficShaper($config)
# Create a new instance based on config information
sub new {
- my ( $that, $config ) = @_;
+ my ( $that, $config, $name ) = @_;
my $self = {%fields};
my $class = ref($that) || $that;
+
bless $self, $class;
+ $self->{_name} = $name;
$self->_define($config);
return $self;