aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorChong Yidong2010-05-22 12:48:01 -0400
committerChong Yidong2010-05-22 12:48:01 -0400
commit110683addccf829fa2b98fa279246f60a228d4fa (patch)
treecd79923115846b4f226a3d2d32f767bbf7feee9c /lisp
parent4e3028f8f788c646a184f74f13c6e8ec0bc61b81 (diff)
downloademacs-110683addccf829fa2b98fa279246f60a228d4fa.tar.gz
emacs-110683addccf829fa2b98fa279246f60a228d4fa.zip
Rename image-refresh to image-flush.
* image.c (Fimage_flush): Rename from image-refresh. * image.el (image-refresh): Define as an alias for image-flush. * image-mode.el (image-toggle-display-image): Caller changed. * display.texi (Image Cache): Update documentation about image caching.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/ChangeLog6
-rw-r--r--lisp/image-mode.el4
-rw-r--r--lisp/image.el1
3 files changed, 9 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index e59c4a45c29..72f00e60edf 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
12010-05-22 Chong Yidong <cyd@stupidchicken.com>
2
3 * image.el (image-refresh): Define as an alias for image-flush.
4
5 * image-mode.el (image-toggle-display-image): Caller changed.
6
12010-05-21 Juri Linkov <juri@jurta.org> 72010-05-21 Juri Linkov <juri@jurta.org>
2 8
3 * progmodes/grep.el (grep-read-files): Fix multi-pattern aliases. 9 * progmodes/grep.el (grep-read-files): Fix multi-pattern aliases.
diff --git a/lisp/image-mode.el b/lisp/image-mode.el
index dfc96bb4a16..f1323563d5d 100644
--- a/lisp/image-mode.el
+++ b/lisp/image-mode.el
@@ -448,7 +448,7 @@ Remove text properties that display the image."
448 448
449(defvar archive-superior-buffer) 449(defvar archive-superior-buffer)
450(defvar tar-superior-buffer) 450(defvar tar-superior-buffer)
451(declare-function image-refresh "image.c" (spec &optional frame)) 451(declare-function image-flush "image.c" (spec &optional frame))
452 452
453(defun image-toggle-display-image () 453(defun image-toggle-display-image ()
454 "Show the image of the image file. 454 "Show the image of the image file.
@@ -477,7 +477,7 @@ was inserted."
477 (inhibit-read-only t) 477 (inhibit-read-only t)
478 (buffer-undo-list t) 478 (buffer-undo-list t)
479 (modified (buffer-modified-p))) 479 (modified (buffer-modified-p)))
480 (image-refresh image) 480 (image-flush image)
481 (let ((buffer-file-truename nil)) ; avoid changing dir mtime by lock_file 481 (let ((buffer-file-truename nil)) ; avoid changing dir mtime by lock_file
482 (add-text-properties (point-min) (point-max) props) 482 (add-text-properties (point-min) (point-max) props)
483 (restore-buffer-modified-p modified)) 483 (restore-buffer-modified-p modified))
diff --git a/lisp/image.el b/lisp/image.el
index 67c1ad946b1..b3a0f1a8a7d 100644
--- a/lisp/image.el
+++ b/lisp/image.el
@@ -30,6 +30,7 @@
30 "Image support." 30 "Image support."
31 :group 'multimedia) 31 :group 'multimedia)
32 32
33(defalias 'image-refresh 'image-flush)
33 34
34(defconst image-type-header-regexps 35(defconst image-type-header-regexps
35 `(("\\`/[\t\n\r ]*\\*.*XPM.\\*/" . xpm) 36 `(("\\`/[\t\n\r ]*\\*.*XPM.\\*/" . xpm)