Commit 8bdb9f4a authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(rmail-forward): Insert separator before and after message.

parent eaccd4d8
......@@ -2016,7 +2016,13 @@ see the documentation of `rmail-resend'."
(search-forward-regexp
(concat "^" (regexp-quote mail-header-separator) "$"))
(forward-line 1)
(insert-buffer forward-buffer))))))
(insert "------- Start of forwarded message -------\n")
(insert-buffer forward-buffer)
(forward-line -1)
(exchange-point-and-mark)
(insert "------- End of forwarded message -------\n")
(forward-line -1)
(exchange-point-and-mark))))))
(defun rmail-resend (address &optional from comment mail-alias-file)
"Resend current message to ADDRESSES.
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment