From 9ce1fff298f212789d6c7d7792d17cd6271b6413 Mon Sep 17 00:00:00 2001
From: lars <lars@systemausfall.org>
Date: Mon, 3 Apr 2006 10:59:34 +0000
Subject: [PATCH] fixed key retrieval

---
 gpg-Ezmlm/trunk/Gpg.pm | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/gpg-Ezmlm/trunk/Gpg.pm b/gpg-Ezmlm/trunk/Gpg.pm
index 01895de..0be4704 100644
--- a/gpg-Ezmlm/trunk/Gpg.pm
+++ b/gpg-Ezmlm/trunk/Gpg.pm
@@ -391,7 +391,10 @@ sub _get_keys() {
 			$expires, $u2, $ownertrust, $uid) = split ":", $key;
 			# stupid way of "decoding" utf8 (at least it works for ":")
 			$uid =~ s/\\x3a/:/g;
-		push @keys, {uid => $uid, id => $id};
+			$uid =~ /^(.*) <([^<]*)>/;
+			my $name = $1;
+			my $email = $2;
+		push @keys, {name => $name, email => $email, id => $id, expires => $expires};
 	}
 	return @keys;
 }