# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1114378348 0
# Node ID edcdb077c4c18ba9bd5de257a3a715f8a5f176a3
# Parent  13d42889189fbff382150719806f5cf50b9837d4
(rmail-font-lock-keywords): Match any number of
citation markers at start of each line.

diff -r 13d42889189f -r edcdb077c4c1 lisp/mail/rmail.el
--- a/lisp/mail/rmail.el	Sun Apr 24 21:31:37 2005 +0000
+++ b/lisp/mail/rmail.el	Sun Apr 24 21:32:28 2005 +0000
@@ -662,13 +662,12 @@
 	    ;; Use MATCH-ANCHORED to effectively anchor the regexp left side.
 	    `(,cite-chars
 	      (,(concat "\\=[ \t]*"
-			"\\(\\([" cite-prefix "]+[" cite-suffix "]*\\)?"
-			"\\(" cite-chars "[ \t]*\\)\\)+"
+			"\\(\\(\\([" cite-prefix "]+[" cite-suffix "]*\\)?"
+			"\\(" cite-chars "[ \t]*\\)\\)+\\)"
 			"\\(.*\\)")
 	       (beginning-of-line) (end-of-line)
-	       (2 font-lock-comment-delimiter-face nil t)
-	       (3 font-lock-comment-delimiter-face nil t)
-	       (4 font-lock-comment-face nil t)))
+	       (1 font-lock-comment-delimiter-face nil t)
+	       (5 font-lock-comment-face nil t)))
 	    '("^\\(X-[a-z0-9-]+\\|In-reply-to\\|Date\\):.*\\(\n[ \t]+.*\\)*$"
 	      . font-lock-string-face))))
   "Additional expressions to highlight in Rmail mode.")