Function: rmail-insert-mime-resent-message

rmail-insert-mime-resent-message is a byte-compiled function defined in rmailmm.el.gz.

Signature

(rmail-insert-mime-resent-message FORWARD-BUFFER)

Documentation

Function to set in rmail-insert-mime-resent-message-function (which see).

Source Code

;; Defined in /usr/src/emacs/lisp/mail/rmailmm.el.gz
(defun rmail-insert-mime-resent-message (forward-buffer)
  "Function to set in `rmail-insert-mime-resent-message-function' (which see)."
  (insert-buffer-substring
   (with-current-buffer forward-buffer rmail-view-buffer))
  (goto-char (point-min))
  (when (looking-at "From ")
    (forward-line 1)
    (delete-region (point-min) (point))))