Index: auctex/font-latex.el
diff -u auctex/font-latex.el:5.110 auctex/font-latex.el:5.111
--- auctex/font-latex.el:5.110 Thu Apr 28 14:12:40 2005
+++ auctex/font-latex.el Sun May 1 18:55:27 2005
@@ -386,7 +386,9 @@
Generated by `font-latex-make-match-defun'.")
(when ,(intern (concat prefix name))
(re-search-forward
- ,(intern (concat prefix name)) limit t))))))))
+ ,(intern (concat prefix name)) limit t)))))))
+ (when (byte-code-function-p (symbol-function 'font-latex-make-match-defun))
+ (byte-compile (intern (concat prefix name)))))
(defun font-latex-keyword-matcher (prefix name face type)
"Return a matcher and highlighter as required by `font-lock-keywords'.
@@ -510,7 +512,12 @@
keywords-entry t)
(when (= level 1)
(add-to-list (intern (concat "font-latex-keywords-2"))
- keywords-entry t)))))))
+ keywords-entry t)))
+
+ ;; Compile font-latex-match-*-make
+ (when (byte-code-function-p (symbol-function
+ 'font-latex-make-built-in-keywords))
+ (byte-compile (intern (concat prefix name "-make"))))))))
(font-latex-make-built-in-keywords)
(defcustom font-latex-user-keyword-classes nil
_______________________________________________
auctex-diffs mailing list
[EMAIL PROTECTED]
http://lists.gnu.org/mailman/listinfo/auctex-diffs
