* 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.
;; 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))))))