1465 |
(when (nth 4 defaults) |
(when (nth 4 defaults) |
1466 |
(set (make-local-variable 'font-lock-beginning-of-syntax-function) |
(set (make-local-variable 'font-lock-beginning-of-syntax-function) |
1467 |
(nth 4 defaults))) |
(nth 4 defaults))) |
1468 |
;; The variable alist is set in font-core.el. |
;; Variable alist? |
1469 |
|
(dolist (x (nthcdr 5 defaults)) |
1470 |
|
(set (make-local-variable (car x)) (cdr x))) |
1471 |
;; Setup `font-lock-keywords' last because its value might depend |
;; Setup `font-lock-keywords' last because its value might depend |
1472 |
;; on other settings (e.g. font-lock-compile-keywords uses |
;; on other settings (e.g. font-lock-compile-keywords uses |
1473 |
;; font-lock-beginning-of-syntax-function). |
;; font-lock-beginning-of-syntax-function). |