Commit 903e09b7 authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(rmail-msg-is-pruned): Delete junk from definition.

parent 32eb9671
......@@ -1769,13 +1769,10 @@ Otherwise, delete all header fields whose names match `rmail-ignored-headers'."
(defun rmail-msg-is-pruned ()
(rmail-maybe-set-message-counters)
(save-restriction
(narrow-to-region (rmail-msgbeg rmail-current-message) (point-max))
(save-excursion
(narrow-to-region (rmail-msgbeg rmail-current-message) (point-max))
(if (not (or (= ?\n (char-after (point)))
(= ?\n (char-before (1- (point))))))
(insert "\n"))
(goto-char (point-min))
(forward-line 1)
(goto-char (point-min))
(forward-line 1)
(= (following-char) ?1))))
(defun rmail-toggle-header (&optional arg)
......
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