Function: mh-mime-save-part
mh-mime-save-part is an interactive and byte-compiled function defined
in mh-mime.el.gz.
Signature
(mh-mime-save-part)
Documentation
Save MIME part at point.
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/mh-e/mh-mime.el.gz
(defun mh-mime-save-part ()
"Save MIME part at point."
(interactive)
(let ((data (get-text-property (point) 'mh-data)))
(when data
(let ((mm-default-directory
(file-name-as-directory (or mh-mime-save-parts-directory
default-directory))))
(mh-mm-save-part data)
(setq mh-mime-save-parts-directory mm-default-directory)))))