From 835fa11c528f7f2eedef7a473136c9d1275e66cd Mon Sep 17 00:00:00 2001 From: ShengHuo ZHU Date: Fri, 17 Nov 2000 21:31:48 +0000 Subject: [PATCH] Simplify quote-prefix-regexp. --- lisp/message.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/lisp/message.el b/lisp/message.el index ed0903af9..ebea5f5ab 100644 --- a/lisp/message.el +++ b/lisp/message.el @@ -1520,11 +1520,11 @@ M-RET message-newline-and-reformat (break the line and reformat)." (make-local-variable 'auto-fill-inhibit-regexp) (let ((quote-prefix-regexp (concat - "[ \t]*" ; possible initial space - "\\(\\(" - message-cite-prefix-regexp "\\|" ; various citation prefix + "\\(" (regexp-quote message-yank-prefix) ; user's prefix - "\\)[ \t]*\\)+"))) ; possible space after each prefix + "\\)?\\(" + message-cite-prefix-regexp ; various prefix + "\\)[ \t]*"))) ; possible space after each prefix (setq paragraph-start (concat (regexp-quote mail-header-separator) "$\\|" -- 2.25.1