diff options
| author | Colin Walters | 2002-06-12 04:54:41 +0000 |
|---|---|---|
| committer | Colin Walters | 2002-06-12 04:54:41 +0000 |
| commit | 93e5c2b583ef02132623197a090dd27eeb08ae05 (patch) | |
| tree | db6f3e9447a5f3ea208591701aa78924ffc41934 | |
| parent | 61fd2c68327f5ec3785ff7493b975aec905d882c (diff) | |
| download | emacs-93e5c2b583ef02132623197a090dd27eeb08ae05.tar.gz emacs-93e5c2b583ef02132623197a090dd27eeb08ae05.zip | |
(font-lock-set-defaults-1): Set variable alist here.
| -rw-r--r-- | lisp/font-lock.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/font-lock.el b/lisp/font-lock.el index eb69a93f846..04d422b7942 100644 --- a/lisp/font-lock.el +++ b/lisp/font-lock.el | |||
| @@ -1465,8 +1465,9 @@ A LEVEL of nil is equal to a LEVEL of 0, a LEVEL of t is equal to | |||
| 1465 | (when (nth 4 defaults) | 1465 | (when (nth 4 defaults) |
| 1466 | (set (make-local-variable 'font-lock-beginning-of-syntax-function) | 1466 | (set (make-local-variable 'font-lock-beginning-of-syntax-function) |
| 1467 | (nth 4 defaults))) | 1467 | (nth 4 defaults))) |
| 1468 | ;; The variable alist is set in font-core.el. | 1468 | ;; Variable alist? |
| 1469 | 1469 | (dolist (x (nthcdr 5 defaults)) | |
| 1470 | (set (make-local-variable (car x)) (cdr x))) | ||
| 1470 | ;; Setup `font-lock-keywords' last because its value might depend | 1471 | ;; Setup `font-lock-keywords' last because its value might depend |
| 1471 | ;; on other settings (e.g. font-lock-compile-keywords uses | 1472 | ;; on other settings (e.g. font-lock-compile-keywords uses |
| 1472 | ;; font-lock-beginning-of-syntax-function). | 1473 | ;; font-lock-beginning-of-syntax-function). |