Fixed.

[elisp/epg.git] / epg.el

diff --git a/epg.el b/epg.el
index 9a5f46e..e3ff7cd 100644 (file)
--- a/epg.el
+++ b/epg.el
@@ -375,7 +375,8 @@ This function is for internal use only."
   "Start `epg-gpg-program' in a subprocess with given ARGS."
   (let* ((args (append (list "--no-tty"
                             "--status-fd" "1"
-                            "--command-fd" "0")
+                            "--command-fd" "0"
+                            "--yes")
                       (if (epg-context-armor context) '("--armor"))
                       (if (epg-context-textmode context) '("--textmode"))
                       (if (epg-context-output-file context)
@@ -658,8 +659,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)