From: ueno Date: Mon, 17 Apr 2006 02:04:03 +0000 (+0000) Subject: Fixed error messages. X-Git-Tag: epgsm-branchpoint~65 X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=71b204db81eafa4191042df18dc0fb8fb230f9d2;p=elisp%2Fepg.git Fixed error messages. --- diff --git a/epg.el b/epg.el index 9a5f46e..f888ec5 100644 --- a/epg.el +++ b/epg.el @@ -658,8 +658,9 @@ This function is for internal use only." (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)