font-lock as a single command

[Christopher Dimech]

I want to construct the font-lock as a single command

(font-lock-add-keywords nil ...)

But I am unsure how to do it.




(defconst supinf-font-lock-cruc
  (append
     '((supinf-match
          (1 (supinf-raise-cruc (match-beginning 0))) )))
  "Experimental expressions to highlight in TeX modes.")

(defun supinf-enable ()
  "Enables a typeface for displaying tex commands."
  (setq supinf-signal t)
  (font-lock-add-keywords nil supinf-font-lock-cruc t))


---------------------
Christopher Dimech
General Administrator - Naiad Informatics - GNU Project (Geocomputation)
- Geophysical Simulation
- Geological Subsurface Mapping
- Disaster Preparedness and Mitigation
- Natural Resource Exploration and Production
- Free Software Advocacy