diff options
| -rw-r--r-- | lisp/mail/rmail.el | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el index 8bb289ffca3..8ba9408a76f 100644 --- a/lisp/mail/rmail.el +++ b/lisp/mail/rmail.el | |||
| @@ -662,13 +662,12 @@ The first parenthesized expression should match the MIME-charset name.") | |||
| 662 | ;; Use MATCH-ANCHORED to effectively anchor the regexp left side. | 662 | ;; Use MATCH-ANCHORED to effectively anchor the regexp left side. |
| 663 | `(,cite-chars | 663 | `(,cite-chars |
| 664 | (,(concat "\\=[ \t]*" | 664 | (,(concat "\\=[ \t]*" |
| 665 | "\\(\\([" cite-prefix "]+[" cite-suffix "]*\\)?" | 665 | "\\(\\(\\([" cite-prefix "]+[" cite-suffix "]*\\)?" |
| 666 | "\\(" cite-chars "[ \t]*\\)\\)+" | 666 | "\\(" cite-chars "[ \t]*\\)\\)+\\)" |
| 667 | "\\(.*\\)") | 667 | "\\(.*\\)") |
| 668 | (beginning-of-line) (end-of-line) | 668 | (beginning-of-line) (end-of-line) |
| 669 | (2 font-lock-comment-delimiter-face nil t) | 669 | (1 font-lock-comment-delimiter-face nil t) |
| 670 | (3 font-lock-comment-delimiter-face nil t) | 670 | (5 font-lock-comment-face nil t))) |
| 671 | (4 font-lock-comment-face nil t))) | ||
| 672 | '("^\\(X-[a-z0-9-]+\\|In-reply-to\\|Date\\):.*\\(\n[ \t]+.*\\)*$" | 671 | '("^\\(X-[a-z0-9-]+\\|In-reply-to\\|Date\\):.*\\(\n[ \t]+.*\\)*$" |
| 673 | . font-lock-string-face)))) | 672 | . font-lock-string-face)))) |
| 674 | "Additional expressions to highlight in Rmail mode.") | 673 | "Additional expressions to highlight in Rmail mode.") |