Function: epg--status-IMPORT_OK

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

Signature

(epg--status-IMPORT_OK CONTEXT STRING)

Source Code

;; Defined in /usr/src/emacs/lisp/epg.el.gz
(defun epg--status-IMPORT_OK (context string)
  (if (string-match "\\`\\([0-9]+\\)\\( \\(.+\\)\\)?" string)
      (let ((reason (string-to-number (match-string 1 string))))
	(epg-context-set-result-for
	 context 'import-status
	 (cons (epg-make-import-status (if (match-beginning 2)
					   (match-string 3 string))
				       nil
				       (/= (logand reason 1) 0)
				       (/= (logand reason 2) 0)
				       (/= (logand reason 4) 0)
				       (/= (logand reason 8) 0)
				       (/= (logand reason 16) 0))
	       (epg-context-result-for context 'import-status))))))