;; 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
+ (epg-context-set-result-for
epg-context 'error
(list (cons 'exit (string-to-number (match-string 1 status)))))
- (epg-context-result-for epg-context 'error
+ (epg-context-set-result-for epg-context 'error
(list (cons 'signal status))))))))
(defun epg-read-output (context)