[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] /srv/bzr/emacs/trunk r111814: * lisp/image-mode.el (image-
From: |
Glenn Morris |
Subject: |
[Emacs-diffs] /srv/bzr/emacs/trunk r111814: * lisp/image-mode.el (image-mode-map): Add image-dired menu entry. |
Date: |
Sat, 16 Feb 2013 16:50:41 -0800 |
User-agent: |
Bazaar (2.5.0) |
------------------------------------------------------------
revno: 111814
committer: Glenn Morris <address@hidden>
branch nick: trunk
timestamp: Sat 2013-02-16 16:50:41 -0800
message:
* lisp/image-mode.el (image-mode-map): Add image-dired menu entry.
modified:
lisp/ChangeLog
lisp/image-mode.el
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog 2013-02-17 00:45:53 +0000
+++ b/lisp/ChangeLog 2013-02-17 00:50:41 +0000
@@ -1,5 +1,7 @@
2013-02-17 Glenn Morris <address@hidden>
+ * image-mode.el (image-mode-map): Add image-dired menu entry.
+
* image-dired.el (tumme): Make this alias obsolete.
2013-02-16 Glenn Morris <address@hidden>
=== modified file 'lisp/image-mode.el'
--- a/lisp/image-mode.el 2013-02-16 19:56:50 +0000
+++ b/lisp/image-mode.el 2013-02-17 00:50:41 +0000
@@ -376,9 +376,15 @@
:visible (eq image-type 'imagemagick)
:help "Rotate the image"]
"--"
- ["Next Image" image-next-file :active t
+ ["Show Thumbnails"
+ (lambda ()
+ (interactive)
+ (image-dired default-directory))
+ :active default-directory
+ :help "Show thumbnails for all images in this directory"]
+ ["Next Image" image-next-file :active buffer-file-name
:help "Move to next image in this directory"]
- ["Previous Image" image-previous-file :active t
+ ["Previous Image" image-previous-file :active buffer-file-name
:help "Move to previous image in this directory"]
"--"
["Animate Image" image-toggle-animation :style toggle
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] /srv/bzr/emacs/trunk r111814: * lisp/image-mode.el (image-mode-map): Add image-dired menu entry.,
Glenn Morris <=