diff options
| author | Karl Heuer | 1999-05-29 19:20:07 +0000 |
|---|---|---|
| committer | Karl Heuer | 1999-05-29 19:20:07 +0000 |
| commit | 1faf64740a429a34daf61479b49b17bcec5d4b7e (patch) | |
| tree | fad5284762cdc5af4d50c67d583c11ec55e18a04 | |
| parent | 7dcf626950cc86baf03507ddc29cc2acfb333422 (diff) | |
| download | emacs-1faf64740a429a34daf61479b49b17bcec5d4b7e.tar.gz emacs-1faf64740a429a34daf61479b49b17bcec5d4b7e.zip | |
(font-lock-apply-syntactic-highlight): Don't die if
VALUE is a syntax table.
| -rw-r--r-- | lisp/font-lock.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/font-lock.el b/lisp/font-lock.el index d3498a888a5..13c7da67962 100644 --- a/lisp/font-lock.el +++ b/lisp/font-lock.el | |||
| @@ -1232,7 +1232,7 @@ see `font-lock-syntactic-keywords'." | |||
| 1232 | (start (match-beginning match)) (end (match-end match)) | 1232 | (start (match-beginning match)) (end (match-end match)) |
| 1233 | (value (nth 1 highlight)) | 1233 | (value (nth 1 highlight)) |
| 1234 | (override (nth 2 highlight))) | 1234 | (override (nth 2 highlight))) |
| 1235 | (unless (numberp (car value)) | 1235 | (unless (numberp (car-safe value)) |
| 1236 | (setq value (eval value))) | 1236 | (setq value (eval value))) |
| 1237 | (cond ((not start) | 1237 | (cond ((not start) |
| 1238 | ;; No match but we might not signal an error. | 1238 | ;; No match but we might not signal an error. |