From 02512944b279be6e0aa7d1f80f7acd727793c755 Mon Sep 17 00:00:00 2001
From: Nigel Kukard <nkukard@lbsd.net>
Date: Mon, 27 Apr 2009 19:29:56 +0000
Subject: [PATCH] * Don't add raw value if not present for vattributes
---
Radius/Packet.pm | 9 +++++++--
1 file changed, 7 insertions(+), 2 deletions(-)
diff --git a/Radius/Packet.pm b/Radius/Packet.pm
index 941568ed..7d1d2333 100644
--- a/Radius/Packet.pm
+++ b/Radius/Packet.pm
@@ -67,7 +67,12 @@ sub set_vsattr {
}
}
- push @{$attr->{$name}}, $value, $rawValue;
+ # Check if we should be adding the raw value or not
+ if (defined($rawValue)) {
+ push @{$attr->{$name}}, $value, $rawValue;
+ } else {
+ push @{$attr->{$name}}, $value;
+ }
}
sub unset_vsattr {
@@ -432,7 +437,7 @@ sub pack {
foreach my $datum (@{$self->vsattr($vendor, $attr)}) {
my $vval = &{$vsapacker{$self->{'Dict'}->vsattr_type($vid, $attr)}}
($datum, $self->{'Dict'}->vsattr_num($vid, $attr), $vendor);
-
+
if ($vid == 429) {
# As pointed out by Quan Choi,
--
GitLab