# HG changeset patch # User Richard M. Stallman # Date 917552713 0 # Node ID 45e1b3418311160228cf7f6ef60da8b665f6169f # Parent 6e1f6e29422a012ac7a3527ca723a30eee705de9 (font-lock-default-unfontify-region): If not font-lock-syntactic-keywords, don't remove syntax-table prop. diff -r 6e1f6e29422a -r 45e1b3418311 lisp/font-lock.el --- a/lisp/font-lock.el Thu Jan 28 16:30:23 1999 +0000 +++ b/lisp/font-lock.el Thu Jan 28 19:45:13 1999 +0000 @@ -1090,7 +1090,9 @@ (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)