Commit 93e5c2b5 authored by Colin Walters's avatar Colin Walters
Browse files

(font-lock-set-defaults-1): Set variable alist here.

parent 61fd2c68
......@@ -1465,8 +1465,9 @@ A LEVEL of nil is equal to a LEVEL of 0, a LEVEL of t is equal to
(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).
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment