Commit 423c0dfa authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(rmail-reformat-message): Run mail-message-filter

before calling rmail-clear-headers.
parent e7070c01
......@@ -1162,8 +1162,8 @@ This function runs `rmail-get-new-mail-hook' before saving the updated file."
(insert str "*** EOOH ***\n")
(narrow-to-region (point) (- (buffer-size) delta)))
(goto-char (point-min))
(if rmail-ignored-headers (rmail-clear-headers))
(if rmail-message-filter (funcall rmail-message-filter))))
(if rmail-message-filter (funcall rmail-message-filter))
(if rmail-ignored-headers (rmail-clear-headers))))
(defun rmail-clear-headers (&optional ignored-headers)
(or ignored-headers (setq ignored-headers rmail-ignored-headers))
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