X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=epg.el;h=f888ec537945f9729dfb08d684d6c73d06f8ae5b;hb=f7a28f60f11e7a71c5bfa97f3e420c86ca492a65;hp=9a5f46e3d8dd4fe5b7498075f3d80604254bbcb2;hpb=2b454083c640ad93a1adb7cf135885b54c0986f6;p=elisp%2Fepg.git 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)