diff options
| author | Richard M. Stallman <rms@gnu.org> | 1999-01-28 19:45:13 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1999-01-28 19:45:13 +0000 |
| commit | 13911e1d18d16831492ebe2c69d805c7fdd0aa8b (patch) | |
| tree | f481c0870d5ffd38cbb88d0f059db2ecb7efc985 | |
| parent | 302f2b38d094e3e8fae4af48d6c41314e757935b (diff) | |
| download | emacs-13911e1d18d16831492ebe2c69d805c7fdd0aa8b.tar.gz | |
(font-lock-default-unfontify-region):
If not font-lock-syntactic-keywords, don't remove syntax-table prop.
| -rw-r--r-- | lisp/font-lock.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/font-lock.el b/lisp/font-lock.el index 36ed0c0570a..7dbe8d08d9c 100644 --- a/lisp/font-lock.el +++ b/lisp/font-lock.el @@ -1090,7 +1090,9 @@ The value of this variable is used when Font Lock mode is turned on." (defun font-lock-default-unfontify-region (beg end) (save-buffer-state nil - (remove-text-properties beg end '(face nil syntax-table nil)))) + (if font-lock-syntactic-keywords + (remove-text-properties beg end '(face nil syntax-table nil)) + (remove-text-properties beg end '(face nil))))) ;; Called when any modification is made to buffer text. (defun font-lock-after-change-function (beg end old-len) |