2000-11-03 Stefan Monnier <monnier@cs.yale.edu>
authorShengHuo ZHU <zsh@cs.rochester.edu>
Sat, 4 Nov 2000 13:35:32 +0000 (13:35 +0000)
committerShengHuo ZHU <zsh@cs.rochester.edu>
Sat, 4 Nov 2000 13:35:32 +0000 (13:35 +0000)
* message.el (message-font-lock-keywords): Match a final newline
to help font-lock's multiline support.

lisp/ChangeLog
lisp/message.el

index 59d33af..47729b5 100644 (file)
@@ -1,3 +1,8 @@
+2000-11-03  Stefan Monnier  <monnier@cs.yale.edu>
+
+       * message.el (message-font-lock-keywords): Match a final newline
+       to help font-lock's multiline support.
+       
 2000-11-04 09:11:44  ShengHuo ZHU  <zsh@cs.rochester.edu>
 
        * nnoo.el (nnoo-set): New function.
index 444ab46..4ad6334 100644 (file)
@@ -821,7 +821,7 @@ Defaults to `text-mode-abbrev-table'.")
 (defvar message-font-lock-keywords
   (let* ((cite-prefix "A-Za-z")
         (cite-suffix (concat cite-prefix "0-9_.@-"))
-        (content "[ \t]*\\(.+\\(\n[ \t].*\\)*\\)"))
+        (content "[ \t]*\\(.+\\(\n[ \t].*\\)*\\)\n?"))
     `((,(concat "^\\([Tt]o:\\)" content)
        (1 'message-header-name-face)
        (2 'message-header-to-face nil t))