Function: rmail-mime-find-header-encoding
rmail-mime-find-header-encoding is a byte-compiled function defined in
rmailmm.el.gz.
Signature
(rmail-mime-find-header-encoding HEADER)
Documentation
Return the last coding system used to decode HEADER.
HEADER is a header component of a MIME-entity object (see
rmail-mime-entity).
Source Code
;; Defined in /usr/src/emacs/lisp/mail/rmailmm.el.gz
(defun rmail-mime-find-header-encoding (header)
"Return the last coding system used to decode HEADER.
HEADER is a header component of a MIME-entity object (see
`rmail-mime-entity')."
(with-temp-buffer
(let ((buf (current-buffer)))
(with-current-buffer rmail-mime-mbox-buffer
(let ((last-coding-system-used nil)
(rmail-buffer rmail-mime-mbox-buffer)
(rmail-view-buffer buf))
(save-excursion
(goto-char (aref header 0))
(rmail-copy-headers (point) (aref header 1)))))
(rfc2047-decode-region (point-min) (point-max))
last-coding-system-used)))