comparison lisp/textmodes/tex-mode.el @ 90140:02f1dbc4a199

Revision: miles@gnu.org--gnu-2005/emacs--unicode--0--patch-35 Merge from emacs--cvs-trunk--0 Patches applied: * emacs--cvs-trunk--0 (patch 228-240) - Update from CVS - Merge from gnus--rel--5.10 * gnus--rel--5.10 (patch 53-58) - Merge from emacs--cvs-trunk--0 - Update from CVS - Collapse feature addition/removal within single ChangeLog entry
author Miles Bader <miles@gnu.org>
date Sat, 09 Apr 2005 02:16:29 +0000
parents 4da4a09e8b1b c277eb06ba34
children 08185296b491
comparison
equal deleted inserted replaced
90139:e0d294b9b23e 90140:02f1dbc4a199
571 ;; Old-style bf/em/it/sl. Stop at `\\' and un-escaped `&', for tables. 571 ;; Old-style bf/em/it/sl. Stop at `\\' and un-escaped `&', for tables.
572 (list (concat "\\\\\\(em\\|it\\|sl\\)\\>" args) 572 (list (concat "\\\\\\(em\\|it\\|sl\\)\\>" args)
573 2 '(tex-font-lock-append-prop 'italic) 'append) 573 2 '(tex-font-lock-append-prop 'italic) 'append)
574 ;; This is separate from the previous one because of cases like 574 ;; This is separate from the previous one because of cases like
575 ;; {\em foo {\bf bar} bla} where both match. 575 ;; {\em foo {\bf bar} bla} where both match.
576 (list (concat "\\\\\\(bf\\)\\>" args) 576 (list (concat "\\\\\\(bf\\(series\\)?\\)\\>" args)
577 2 '(tex-font-lock-append-prop 'bold) 'append))))) 577 2 '(tex-font-lock-append-prop 'bold) 'append)))))
578 "Gaudy expressions to highlight in TeX modes.") 578 "Gaudy expressions to highlight in TeX modes.")
579 579
580 (defun tex-font-lock-suscript (pos) 580 (defun tex-font-lock-suscript (pos)
581 (unless (or (memq (get-text-property pos 'face) 581 (unless (or (memq (get-text-property pos 'face)