(save-excursion
(set-buffer (process-buffer process))
;; gpg process exited abnormally, but we have not received an
- ;; error response from it.
+ ;; error response from it. Set it here.
(unless (epg-context-result-for epg-context 'error)
(if (string-match "\\`exited abnormally with code \\(.*\\)\n" status)
(epg-context-result-for