Commit 523d3bf4 authored by Andreas Schwab's avatar Andreas Schwab
Browse files

(font-lock-change-mode): Avoid changing buffer state in any way.

parent 97acc803
2002-08-31 Andreas Schwab <schwab@suse.de>
* font-core.el (font-lock-change-mode): Avoid changing buffer
state in any way.
2002-08-30 Edward M. Reingold <reingold@emr.cs.iit.edu>
* calendar/diary-lib.el (diary-mail-entries): Don't overwrite
......
......@@ -218,11 +218,20 @@ your own function which is called when `font-lock-mode' is toggled via
;; Get rid of fontification for the old major mode.
;; We do this when changing major modes.
(defun font-lock-change-mode ()
(let ((inhibit-read-only t))
(let ((inhibit-read-only t)
(inhibit-point-motion-hooks t)
(inhibit-modification-hooks t)
(deactivate-mark nil)
(buffer-file-name nil)
(buffer-file-truename nil)
(buffer-undo-list t)
(modified (buffer-modified-p)))
(save-restriction
(widen)
(remove-list-of-text-properties
(point-min) (point-max) '(font-lock-face))))
(point-min) (point-max) '(font-lock-face)))
(unless modified
(restore-buffer-modified-p nil)))
(when font-lock-defaults
(font-lock-unfontify-buffer)))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment