Function: epg-cancel

epg-cancel is a byte-compiled function defined in epg.el.gz.

Signature

(epg-cancel CONTEXT)

Source Code

;; Defined in /usr/src/emacs/lisp/epg.el.gz
(defun epg-cancel (context)
  (if (buffer-live-p (process-buffer (epg-context-process context)))
      (with-current-buffer (process-buffer (epg-context-process context))
	(epg-context-set-result-for
	 epg-context 'error
	 (cons '(quit)
	       (epg-context-result-for epg-context 'error)))))
  (if (eq (process-status (epg-context-process context)) 'run)
      (delete-process (epg-context-process context))))