[Pkg-privacy-commits] [msva-perl] 306/356: avoid a warning if certificate issuer is not present in cert

[Ximin Luo]

This is an automated email from the git hooks/post-receive script.

infinity0 pushed a commit to branch debian
in repository msva-perl.

commit 7de7be032bda472a3b497d1bfc136f6d895efd18
Author: Daniel Kahn Gillmor <dkg at fifthhorseman.net>
Date:   Mon Mar 14 01:06:29 2011 -0400

    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()));
 

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-privacy/packages/msva-perl.git