* message.el (message-newline-and-reformat): Place a boundary

before filling.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index d2fcc7f..d13ac69 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2003-04-12  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 
+       * message.el (message-newline-and-reformat): Place a boundary
+       before filling.
+
        * nnimap.el (nnimap-split-fancy): Ditto.
 
        * gnus-sum.el (gnus-summary-line-message-size): Ditto.

diff --git a/lisp/message.el b/lisp/message.el
index 15d57b3..f182989 100644 (file)
--- a/lisp/message.el
+++ b/lisp/message.el
@@ -2702,6 +2702,7 @@ Prefix arg means justify as well."
        (delete-region (point) (re-search-forward "[ \t]*"))
        (when (and quoted (not bolp))
          (insert quoted leading-space)))
+      (undo-boundary)
       (if quoted
          (let* ((adaptive-fill-regexp
                  (regexp-quote (concat quoted leading-space)))