mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

(hilit-find-file-hook): Preserve buffer modified state.

Browse source
This commit is contained in:
Richard M. Stallman 1994-08-04 20:15:36 +00:00
parent 4500ff36ef
commit 8b947f90b3
1 changed files with 5 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

8
lisp/hilit19.el
View file

@ -815,9 +815,11 @@ non-nil."
(if (> buffer-saved-size (car hilit-auto-rehighlight-fallback))
(setq hilit-auto-rehighlight
(cdr hilit-auto-rehighlight-fallback)))
(if (> buffer-saved-size hilit-auto-highlight-maxout) nil
(hilit-rehighlight-buffer)
(set-buffer-modified-p nil)))))
(if (> buffer-saved-size hilit-auto-highlight-maxout)
nil
(let ((bm (buffer-modified-p)))
(hilit-rehighlight-buffer)
(set-buffer-modified-p bm))))))
(defun hilit-repaint-command (arg)
"Rehighlights according to the value of hilit-auto-rehighlight, or the