Function: mm-archive-dissect-and-inline

mm-archive-dissect-and-inline is an autoloaded and byte-compiled function defined in mm-archive.el.gz.

Signature

(mm-archive-dissect-and-inline HANDLE)

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/mm-archive.el.gz
(defun mm-archive-dissect-and-inline (handle)
  (let ((start (point-marker)))
    (save-restriction
      (narrow-to-region (point) (point))
      (dolist (handle (cddr (mm-dissect-archive handle)))
	(goto-char (point-max))
	(mm-display-inline handle))
      (goto-char (point-max))
      (mm-handle-set-undisplayer
       handle
       (let ((end (point-marker)))
	 (lambda ()
	   (let ((inhibit-read-only t))
	     (remove-images start end)
	     (delete-region start end))))))))