Mercurial > emacs

changeset 45762:49930c2c45ca

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(font-lock-set-defaults-1): Set variable alist here.
author Colin Walters <walters@gnu.org>
date Wed, 12 Jun 2002 04:54:41 +0000
parents 65b3d2289a42
children 6499a200d5d5
files lisp/font-lock.el
diffstat 1 files changed, 3 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/font-lock.el	Wed Jun 12 04:54:30 2002 +0000
+++ b/lisp/font-lock.el	Wed Jun 12 04:54:41 2002 +0000
@@ -1465,8 +1465,9 @@
     (when (nth 4 defaults)
       (set (make-local-variable 'font-lock-beginning-of-syntax-function)
 	   (nth 4 defaults)))
-    ;; The variable alist is set in font-core.el.
-
+    ;; Variable alist?
+    (dolist (x (nthcdr 5 defaults))
+      (set (make-local-variable (car x)) (cdr x)))
     ;; Setup `font-lock-keywords' last because its value might depend
     ;; on other settings (e.g. font-lock-compile-keywords uses
     ;; font-lock-beginning-of-syntax-function).