From 7de7be032bda472a3b497d1bfc136f6d895efd18 Mon Sep 17 00:00:00 2001
From: Daniel Kahn Gillmor <dkg@fifthhorseman.net>
Date: Mon, 14 Mar 2011 01:06:29 -0400
Subject: [PATCH] avoid a warning if certificate issuer is not present in cert

---
 Crypt/Monkeysphere/MSVA.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Crypt/Monkeysphere/MSVA.pm b/Crypt/Monkeysphere/MSVA.pm
index 1ba0605..5c48fa1 100755
--- a/Crypt/Monkeysphere/MSVA.pm
+++ b/Crypt/Monkeysphere/MSVA.pm
@@ -429,7 +429,7 @@
       $key->{error} = sprintf("Error decoding X.509 certificate: %s", $cert->error);
     } else {
       msvalog('verbose', "cert subject: %s\n", $cert->subject_cn());
-      msvalog('verbose', "cert issuer: %s\n", $cert->issuer_cn());
+      msvalog('verbose', "cert issuer: %s\n", (defined $cert->issuer_cn() ? $cert->issuer_cn() : '<none>'));
       msvalog('verbose', "cert pubkey algo: %s\n", $cert->PubKeyAlg());
       msvalog('verbose', "cert pubkey: %s\n", unpack('H*', $cert->pubkey()));
 
-- 
2.26.2