procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(image-toggle-display): Let-bind `buffer-file-truename' to nil around the

Browse source 
call to `add-text-properties' to prevent directory time modification by
lock_file.  Replace `set-buffer-modified-p' with
`restore-buffer-modified-p'.  (Bug#2295)
This commit is contained in:
Juri Linkov 2009-02-12 21:49:29 +00:00
parent 51d861def8
commit 6c34bcde1e
2 changed files with 11 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
lisp/ChangeLog
View file

@ -1,3 +1,11 @@
2009-02-12 Juri Linkov <juri@jurta.org>
* image-mode.el (image-toggle-display):
Let-bind `buffer-file-truename' to nil around the call to
`add-text-properties' to prevent directory time modification
by lock_file. Replace `set-buffer-modified-p' with
`restore-buffer-modified-p'. (Bug#2295)
2009-02-12 Stefan Monnier <monnier@iro.umontreal.ca>
* progmodes/python.el (python-use-skeletons): Re-add.

5
lisp/image-mode.el
View file

@ -457,8 +457,9 @@ and showing the image as an image."
(buffer-undo-list t)
(modified (buffer-modified-p)))
(image-refresh image)
(add-text-properties (point-min) (point-max) props)
(set-buffer-modified-p modified)
(let ((buffer-file-truename nil)) ; avoid changing dir mtime by lock_file
(add-text-properties (point-min) (point-max) props)
(restore-buffer-modified-p modified))
;; Inhibit the cursor when the buffer contains only an image,
;; because cursors look very strange on top of images.
(setq cursor-type nil)