From xemacs-m  Sat Mar 15 20:02:15 1997
Received: from beavis.bayserve.net (jmiller@port79.bayserve.net [206.148.244.170])
	by xemacs.org (8.8.5/8.8.5) with ESMTP id UAA27370
	for <xemacs-beta@xemacs.org>; Sat, 15 Mar 1997 20:02:13 -0600 (CST)
Received: (from jmiller@localhost) by beavis.bayserve.net (8.7.5/8.7.3) id VAA00537; Sat, 15 Mar 1997 21:10:27 -0500
Date: Sat, 15 Mar 1997 21:10:27 -0500
Message-Id: <199703160210.VAA00537@beavis.bayserve.net>
From: Jeff Miller <jmiller@bayserve.net>
To: xemacs-beta@xemacs.org
Subject: need font-lock help
Reply-to: jmiller@bayserve.net
Mime-Version: 1.0 (generated by tm-edit 7.105)
Content-Type: text/plain; charset=US-ASCII


Calling all font-lock experts! :)

In 19.13, I used the following to font-lock the vm-summary buffer. It was
pretty nice because it really hightlighted what was deleted/marked and so
on. 

(defvar vm-summary-font-lock-keywords nil
  "Expressions to highlight in VM summary buffers"
  )

(setq vm-summary-font-lock-keywords
      (list
       '("^->.*$" . vm-summary-current-face)
       '("^\\( *[0-9]+ \\*.*\\)$" . vm-summary-marked-face)
       '("^\\( *[0-9]+ D.*\\)$" . vm-summary-deleted-face)  
       '("^\\( *[0-9]+ U.*\\)$" . vm-summary-unread-face)
       '("^\\( *[0-9]+ N.*\\)$" . vm-summary-new-face)
       '("^\\( *[0-9]+  .*\\)$" . vm-summary-seen-face)
       ))

(copy-face 'bold     'vm-summary-current-face)
(set-face-foreground 'vm-summary-current-face "black")
(set-face-background 'vm-summary-current-face "skyblue")

(copy-face 'default  'vm-summary-marked-face)
(set-face-foreground 'vm-summary-marked-face "purple")

(copy-face 'default  'vm-summary-deleted-face)
(set-face-foreground 'vm-summary-deleted-face "red")

(copy-face 'default  'vm-summary-unread-face)
(set-face-foreground 'vm-summary-unread-face "firebrick")

(copy-face 'bold     'vm-summary-new-face)
(set-face-foreground 'vm-summary-new-face "blue")

(copy-face 'default  'vm-summary-seen-face)
(set-face-foreground 'vm-summary-seen-face "RoyalBlue")

(add-hook 'vm-summary-mode-hook 'turn-on-font-lock)

This stopped working in 19.14 and still does not work in 19.15 or 20.x. As
far as I can tell the regex's are still valid. 

The only font locking I'm seeing is the subject in green.  It makes me
think the fontlock is just marking it as a doc-string, but I'm not sure. 

The only time I notice the above font locking work correctly (or should I
say as I want it to) is when there is no subject in the email.  

Any ideas?

Jeff

