diff options
| -rw-r--r-- | lisp/tumme.el | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/tumme.el b/lisp/tumme.el index 91ea540467e..91d7f72b5b9 100644 --- a/lisp/tumme.el +++ b/lisp/tumme.el | |||
| @@ -3,7 +3,7 @@ | |||
| 3 | ;; Copyright (C) 2005 Free Software Foundation, Inc. | 3 | ;; Copyright (C) 2005 Free Software Foundation, Inc. |
| 4 | ;; | 4 | ;; |
| 5 | ;; Version: 0.4.10 | 5 | ;; Version: 0.4.10 |
| 6 | ;; Keywords: images, thumbnails, dired | 6 | ;; Keywords: multimedia |
| 7 | ;; Author: Mathias Dahl <mathias.rem0veth1s.dahl@gmail.com> | 7 | ;; Author: Mathias Dahl <mathias.rem0veth1s.dahl@gmail.com> |
| 8 | 8 | ||
| 9 | ;; This file is part of GNU Emacs. | 9 | ;; This file is part of GNU Emacs. |
| @@ -969,6 +969,7 @@ add a subdirectory." | |||
| 969 | (tumme-display-image-mode))) | 969 | (tumme-display-image-mode))) |
| 970 | buf)) | 970 | buf)) |
| 971 | 971 | ||
| 972 | ;;;###autoload | ||
| 972 | (defun tumme-dired (dir &optional arg) | 973 | (defun tumme-dired (dir &optional arg) |
| 973 | "Open directory DIR and create a default window configuration. | 974 | "Open directory DIR and create a default window configuration. |
| 974 | 975 | ||
| @@ -1643,6 +1644,7 @@ Resized or in full-size." | |||
| 1643 | (tumme-define-display-image-mode-keymap) | 1644 | (tumme-define-display-image-mode-keymap) |
| 1644 | (message "tumme-display-image-mode enabled")) | 1645 | (message "tumme-display-image-mode enabled")) |
| 1645 | 1646 | ||
| 1647 | ;;;###autoload | ||
| 1646 | (defun tumme-setup-dired-keybindings () | 1648 | (defun tumme-setup-dired-keybindings () |
| 1647 | "Setup easy-to-use keybindings for the commands to be used in dired mode. | 1649 | "Setup easy-to-use keybindings for the commands to be used in dired mode. |
| 1648 | Note that n, p and <down> and <up> will be hijacked and bound to | 1650 | Note that n, p and <down> and <up> will be hijacked and bound to |
| @@ -2601,7 +2603,7 @@ when using per-directory thumbnail file storage")) | |||
| 2601 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; | 2603 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| 2602 | 2604 | ||
| 2603 | 2605 | ||
| 2604 | (setq tumme-dir-max-size 12300000) | 2606 | (defvar tumme-dir-max-size 12300000) |
| 2605 | 2607 | ||
| 2606 | (defun tumme-test () | 2608 | (defun tumme-test () |
| 2607 | "Clean `tumme-dir' from old thumbnail files. | 2609 | "Clean `tumme-dir' from old thumbnail files. |