(if (string-match "\\`\\([0-9]+\\) \\(.*\\)" string)
(epg-context-set-result-for
epg-context 'error
- (cons (cons 'invalid-recipient
- (string-to-number (match-string 1 string)))
+ (cons (list 'invalid-recipient
+ (string-to-number (match-string 1 string))
+ (match-string 2 string))
(epg-context-result-for epg-context 'error)))))
(defun epg-status-NO_RECP (process string)