From 4b1533e925b8e32c7d8d27eafc032c7d43e9f904 Mon Sep 17 00:00:00 2001
From: "Eric A. Miller" <emiller@cpan.org>
Date: Tue, 15 Oct 2013 21:52:18 -0400
Subject: [PATCH] Don't try to munge undef values

---
 ChangeLog | 1 +
 Info.pm   | 2 ++
 2 files changed, 3 insertions(+)

diff --git a/ChangeLog b/ChangeLog
index 66626f6c..bb015b4e 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -27,6 +27,7 @@ version 3.08 ()
 
     * [#68] Fix device_port entries for switches with non-unique
       ifDesc (Nic Bernstein)
+    * Don't try to munge undef values
 
 version 3.07 (2013-10-01)
 
diff --git a/Info.pm b/Info.pm
index e9365648..826ff521 100644
--- a/Info.pm
+++ b/Info.pm
@@ -4236,11 +4236,13 @@ sub _munge {
         my %munged;
         foreach my $key ( keys %$data ) {
             my $value = $data->{$key};
+            next unless $value;
             $munged{$key} = $subref->($value);
         }
         return \%munged;
     }
     else {
+        return unless $data;
         my $subref = $munge->{$attr};
         return $subref->($data);
     }