From 3e22e24dc9a731799484e0f0282453826dcd8514 Mon Sep 17 00:00:00 2001 From: "Eric A. Miller" Date: Sun, 15 Dec 2013 20:19:08 -0500 Subject: [PATCH] Data values of zero are now sent to munge method instead of skipped --- ChangeLog | 1 + Info.pm | 2 +- 2 files changed, 2 insertions(+), 1 deletion(-) diff --git a/ChangeLog b/ChangeLog index 3be82ca9..4d63ddfd 100644 --- a/ChangeLog +++ b/ChangeLog @@ -35,6 +35,7 @@ version 3.09 () * Don't assume entity index 1 is the chassis and has serial in Layer3 * Capture serial number on newer Aruba devices * munge_bits() correctly unpacks BITS + * Data values of zero are now sent to munge method instead of skipped version 3.08 (2013-10-22) diff --git a/Info.pm b/Info.pm index 64549d16..165c4618 100644 --- a/Info.pm +++ b/Info.pm @@ -4267,7 +4267,7 @@ sub _munge { my %munged; foreach my $key ( keys %$data ) { my $value = $data->{$key}; - next unless $value; + next unless defined $value; $munged{$key} = $subref->($value); } return \%munged;