Function: mm-view-pkcs7-get-type

mm-view-pkcs7-get-type is a byte-compiled function defined in mm-view.el.gz.

Signature

(mm-view-pkcs7-get-type HANDLE)

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/mm-view.el.gz
(defun mm-view-pkcs7-get-type (handle)
  (mm-with-unibyte-buffer
    (mm-insert-part handle)
    (cond ((looking-at mm-pkcs7-enveloped-magic)
	   'enveloped)
	  ((looking-at mm-pkcs7-signed-magic)
	   'signed)
	  (t
	   (error "Could not identify PKCS#7 type")))))