[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] emacs/lisp image-mode.el
From: |
Juri Linkov |
Subject: |
[Emacs-diffs] emacs/lisp image-mode.el |
Date: |
Thu, 12 Feb 2009 21:48:55 +0000 |
CVSROOT: /sources/emacs
Module name: emacs
Changes by: Juri Linkov <jurta> 09/02/12 21:48:55
Modified files:
lisp : image-mode.el
Log message:
(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)
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/image-mode.el?cvsroot=emacs&r1=1.55&r2=1.56
Patches:
Index: image-mode.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/image-mode.el,v
retrieving revision 1.55
retrieving revision 1.56
diff -u -b -r1.55 -r1.56
--- image-mode.el 7 Feb 2009 15:29:14 -0000 1.55
+++ image-mode.el 12 Feb 2009 21:48:55 -0000 1.56
@@ -457,8 +457,9 @@
(buffer-undo-list t)
(modified (buffer-modified-p)))
(image-refresh image)
+ (let ((buffer-file-truename nil)) ; avoid changing dir mtime by lock_file
(add-text-properties (point-min) (point-max) props)
- (set-buffer-modified-p modified)
+ (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)