[EMAIL PROTECTED] (Johan Bockgård) writes: > haomiao <[EMAIL PROTECTED]> writes: > >> (defun gnus-user-format-function-a (header) >> "Test dynamic color" >> (let ((date-time (format-time-string "%m/%d" (safe-date-to-time >> (mail-header-date header))))) >> (if (string= date-time (format-time-string "%m/%d")) >> (propertize date-time 'face 'my-red-face 'mouse-face 'my-blue- >> face) >> (propertize date-time 'face 'my-blue-face 'mouse-face 'my-red- >> face)))) >> >> It seems that gnus will modify the face property of the text >> returned, but not the mouse-face property. > > Try > > [...] > (propertize date-time 'face 'my-red-face 'mouse-face 'my-blue-face > 'gnus-face t) > (propertize date-time 'face 'my-blue-face 'mouse-face 'my-red-face > 'gnus-face t)
It works nice for me. Could you explain this a bit more? Why is the 'gnus-face property necessary so that the 'face property is taken into account? BTW, I did notice that (global-font-lock-mode -1) doesn't prevent Gnus from being fontified. Is it related to a specific handling of faces in Gnus? Thanks in advance for details, -- Bastien _______________________________________________ info-gnus-english mailing list info-gnus-english@gnu.org http://lists.gnu.org/mailman/listinfo/info-gnus-english
