Commit 08f66232 authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(pmail-cease-edit): Put `>' before `From ' lines in message.

parent 0ff954c7
......@@ -107,6 +107,12 @@ This functions runs the normal hook `pmail-edit-mode-hook'.
(save-excursion
(set-buffer pmail-summary-buffer)
(pmail-summary-enable)))
;; Disguise any "From " lines so they don't start a new message.
(save-excursion
(goto-char (point-min))
(while (search-forward "\nFrom " nil t)
(beginning-of-line)
(insert ">")))
;; Make sure buffer ends with a blank line
;; so as not to run this message together with the following one.
(save-excursion
......
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