Mercurial > emacs
changeset 57831:5e17e1a1eacf
(group thumbs): Add :version keyword.
| author | John Paul Wallington <jpw@pobox.com> |
|---|---|
| date | Mon, 01 Nov 2004 07:57:19 +0000 |
| parents | c139689dbd5d |
| children | f549c9eceb49 |
| files | lisp/thumbs.el |
| diffstat | 1 files changed, 4 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/thumbs.el Mon Nov 01 07:56:17 2004 +0000 +++ b/lisp/thumbs.el Mon Nov 01 07:57:19 2004 +0000 @@ -30,8 +30,8 @@ ;;; Commentary: ;; This package create two new mode: thumbs-mode and -;; thumbs-view-image-mode. It is used for images browsing and viewing -;; from within emacs. Minimal image manipulation functions are also +;; thumbs-view-image-mode. It is used for images browsing and viewing +;; from within Emacs. Minimal image manipulation functions are also ;; available via external programs. ;; ;; The 'convert' program from 'ImageMagick' @@ -62,6 +62,7 @@ (defgroup thumbs nil "Thumbnails previewer." + :version "21.4" :group 'multimedia) (defcustom thumbs-thumbsdir @@ -416,7 +417,7 @@ (defalias 'thumbs 'thumbs-show-all-from-dir) (defun thumbs-find-image (img &optional num otherwin) - (funcall + (funcall (if otherwin 'switch-to-buffer-other-window 'switch-to-buffer) (concat "*Image: " (file-name-nondirectory img) " - " (number-to-string (or num 0)) "*"))