(let* ((expired (eq (epg-signature-status (car pgg-epg-signatures))
'key-expired))
(signer (cons (epg-signature-key-id (car pgg-epg-signatures))
- (epg-signature-user-id (car pgg-epg-signatures))))
+ (cdr (assoc (epg-signature-key-id
+ (car pgg-epg-signatures))
+ epg-user-id-alist))))
(fprint (epg-signature-fingerprint (car pgg-epg-signatures)))
(trust-good-enough-p
(memq (epg-signature-validity (car pgg-epg-signatures))