From: Katsumi Yamaoka <yamaoka@jpl.org>
Date: Fri, 12 Jan 2018 03:54:07 +0000 (+0000)
Subject: * lisp/gnus/message.el (message-do-auto-fill): Prevent do-auto-fill from
X-Git-Tag: emacs-26.0.91~13
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=bce51bd6f7702dbc70a570e8b905f23db9cdcdcf;p=emacs.git

* lisp/gnus/message.el (message-do-auto-fill): Prevent do-auto-fill from
adding extra citation mark (bug#29767, but it is a different bug).
---

diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el
index aa6178be705..0eebbe299d2 100644
--- a/lisp/gnus/message.el
+++ b/lisp/gnus/message.el
@@ -3441,7 +3441,8 @@ Message buffers and is not meant to be called directly."
 (defun message-do-auto-fill ()
   "Like `do-auto-fill', but don't fill in message header."
   (unless (message-point-in-header-p)
-    (do-auto-fill)))
+    (let ((paragraph-separate (default-value 'paragraph-separate)))
+      (do-auto-fill))))
 
 (defun message-insert-signature (&optional force)
   "Insert a signature.  See documentation for variable `message-signature'."