Function: nndoc-generate-mime-parts-head
nndoc-generate-mime-parts-head is a byte-compiled function defined in
nndoc.el.gz.
Signature
(nndoc-generate-mime-parts-head ARTICLE)
Source Code
;; Defined in /usr/src/emacs/lisp/gnus/nndoc.el.gz
(defun nndoc-generate-mime-parts-head (article)
(let* ((entry (cdr (assq article nndoc-dissection-alist)))
(headers (nth 6 entry)))
(save-restriction
(narrow-to-region (point) (point))
(insert-buffer-substring
nndoc-current-buffer (car entry) (nth 1 entry))
(goto-char (point-max)))
(when headers
(insert headers))))