]> git.eshelyaron.com Git - emacs.git/commitdiff
Tweak previous message-newline-and-reformat change
authorLars Ingebrigtsen <larsi@gnus.org>
Wed, 29 Sep 2021 18:48:41 +0000 (20:48 +0200)
committerLars Ingebrigtsen <larsi@gnus.org>
Wed, 29 Sep 2021 18:48:41 +0000 (20:48 +0200)
* lisp/gnus/message.el (message-newline-and-reformat): Only search
for previous/next cited lines that have space, because it's the
space we're trying to find.

lisp/gnus/message.el

index f51f5c0dd0d6b99220f14985f7b00e6b3df8b6da..d460f9bd922f85c8fda1611e77dd6ff76a46d177 100644 (file)
@@ -3577,7 +3577,7 @@ Prefix arg means justify as well."
         ;; case, the trailing space is commonly not present, so look
         ;; around for other lines that have some data.
         (when (looking-at-p "\n")
-          (let ((regexp (concat "^" message-cite-prefix-regexp ".")))
+          (let ((regexp (concat "^" message-cite-prefix-regexp "[ \t]")))
             (when (or (re-search-backward regexp nil t)
                       (re-search-forward regexp nil t))
               (goto-char (1- (match-end 0))))))