Mercurial > emacs

changeset 22952:cd40154f3c7a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Require sendmail. (message-fill-yanked-message): Use mail-citation-prefix-regexp as an arg to fill-individual-paragraphs.
author Richard M. Stallman <rms@gnu.org>
date Sat, 08 Aug 1998 21:28:09 +0000
parents 19b3899582b4
children fbeacfb09096
files lisp/gnus/message.el
diffstat 1 files changed, 3 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/gnus/message.el	Sat Aug 08 21:27:22 1998 +0000
+++ b/lisp/gnus/message.el	Sat Aug 08 21:28:09 1998 +0000
@@ -31,6 +31,7 @@
 
 (eval-when-compile (require 'cl))
 
+(require 'sendmail)
 (require 'mailheader)
 (require 'rmail)
 (require 'nnheader)
@@ -1556,7 +1557,8 @@
     (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.