Commit 20cf0008 authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

Require sendmail.

(message-fill-yanked-message): Use mail-citation-prefix-regexp
as an arg to fill-individual-paragraphs.
parent 1bcedb3b
......@@ -31,6 +31,7 @@
(eval-when-compile (require 'cl))
(require 'sendmail)
(require 'mailheader)
(require 'rmail)
(require 'nnheader)
......@@ -1556,7 +1557,8 @@ Numeric argument means justify as well."
(goto-char (point-min))
(search-forward (concat "\n" mail-header-separator "\n") nil t)
(let ((fill-prefix message-yank-prefix))
(fill-individual-paragraphs (point) (point-max) justifyp t))))
(fill-individual-paragraphs (point) (point-max) justifyp
mail-citation-prefix-regexp))))
(defun message-indent-citation ()
"Modify text just inserted from a message to be cited.
......
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