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;