From: Guilhem Moulin <guilhem@fripost.org>
Date: Wed, 9 Mar 2016 20:14:40 +0000 (+0100)
Subject: Net::IMAP::InterIMAP: don't print undefined cache values in debug messages.
X-Git-Url: https://git.g-eek.se/?a=commitdiff_plain;h=ebacf74fdb3a507c6b0d865f4e9a8a6e59dbb10c;p=interimap.git

Net::IMAP::InterIMAP: don't print undefined cache values in debug messages.
---

diff --git a/lib/Net/IMAP/InterIMAP.pm b/lib/Net/IMAP/InterIMAP.pm
index bad49da..73f55e8 100644
--- a/lib/Net/IMAP/InterIMAP.pm
+++ b/lib/Net/IMAP/InterIMAP.pm
@@ -1027,7 +1027,7 @@ sub set_cache($$%) {
     }
 
     $self->logger("Update last clean state for $mailbox: ".
-                 '('.join(' ', map {"$_ $cache->{$_}"} keys %$cache).')')
+                 '('.join(' ', map {"$_ $cache->{$_}"} grep {defined $cache->{$_}} keys %$cache).')')
         if $self->{debug};
 }