Function: mml-tweak-externalize-attachments

mml-tweak-externalize-attachments is a byte-compiled function defined in mml.el.gz.

Signature

(mml-tweak-externalize-attachments CONT)

Documentation

Tweak attached files as external parts.

Source Code

;; Defined in /usr/src/emacs/lisp/gnus/mml.el.gz
(defun mml-tweak-externalize-attachments (cont)
  "Tweak attached files as external parts."
  (let (filename-cons)
    (when (and (eq (car cont) 'part)
	       (not (cdr (assq 'buffer cont)))
	       (and (setq filename-cons (assq 'filename cont))
		    (not (equal (cdr (assq 'nofile cont)) "yes"))))
      (setcar cont 'external)
      (setcar filename-cons 'name))))