diff options
Diffstat (limited to 'lisp/epg.el')
| -rw-r--r-- | lisp/epg.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/epg.el b/lisp/epg.el index d80e966c942..b8eb2b48ea7 100644 --- a/lisp/epg.el +++ b/lisp/epg.el @@ -1187,7 +1187,10 @@ This function is for internal use only." epg-pending-status-list) (accept-process-output (epg-context-process context) 1)) (if epg-pending-status-list - (epg-context-set-result-for context 'error 'exit)))) + (epg-context-set-result-for + context 'error + (cons (list 'exit) + (epg-context-result-for context 'error)))))) (defun epg-wait-for-completion (context) "Wait until the `epg-gpg-program' process completes." |