Re: XEmacs/psgml-mode/font-lock

[simon@example.com (Simon Cozens)]

Stephen J. Turnbull (lists.tlug):
>Only the HTML mode is set up for font-lock

This turns out not to be the case! 

(make-face 'sgml-comment-face)
(make-face 'sgml-start-tag-face) 
(make-face 'sgml-end-tag-face) 
(make-face 'sgml-entity-face) 
(make-face 'sgml-doctype-face) 
(set-face-foreground 'sgml-comment-face "cyan") 
(set-face-foreground 'sgml-start-tag-face "yellow") 
(set-face-foreground 'sgml-end-tag-face "yellow") 
(set-face-foreground 'sgml-entity-face "red") 
(set-face-foreground 'sgml-doctype-face "green")
(setq sgml-set-face t) ; <--- This was what I was missing.
(setq sgml-markup-faces 
  '(
     (comment . sgml-comment-face) 
     (start-tag . sgml-start-tag-face) 
     (end-tag . sgml-end-tag-face) 
     (doctype . sgml-doctype-face) 
     (entity . sgml-entity-face)
   )
)

-- 
It took the computational power of three Commodore 64s to fly to the moon.
It takes a 486 to run Windows 95.
Something is wrong here.