Re: Feature request wrt font locking of syntactic keywords
* Ralf Angeli (2005-02-10) writes:
* Ben Wing (2005-02-10) writes:
> Attached is a sync of font-lock with FSF 21.2 that I did awhile ago. I am
> not 100% that this works but I think it did at one point. Maybe this
> contains what you want.
Thanks for the patch. Unfortunately XEmacs throws an error upon
loading a LaTeX file with the patch applied:
--8<---------------cut here---------------start------------->8---
Signaling: (wrong-type-argument sequencep ?\()
[...]
[font-lock-set-defaults]
The `defaults' variable (corresponding to
`font-lock-defaults') in
this part of the code has a value of
((font-latex-keywords font-latex-keywords-1 font-latex-keywords-2) nil nil ((?\( .
".") (?\) . ".") (?$ . "\"")) nil)
That means `slist' is
((?\( . ".") (?\) . ".") (?$ . "\""))
It will probably work with the following change:
--- font-lock.el.patched 2005-02-10 20:25:44 +0100
+++ font-lock.el 2005-02-10 12:35:48 +0100
＠＠ -2560,7 +2560,7 ＠＠
(copy-syntax-table (syntax-table)))
(while slist
;; The character to modify may be a single CHAR or a STRING.
- (let ((chars (if (numberp (car (car slist)))
+ (let ((chars (if (char-or-char-int-p (car (car slist)))
(list (car (car slist)))
(mapcar 'identity (car (car slist)))))
(syntax (cdr (car slist))))
But I cannot really test it because during startup XEmacs complains
about the :inherit attribute of `font-lock-doc-string-face' which it
does not understand. That means the corresponding changes in faces.el
are needed for the font-lock.el patch to work.
--
Ralf