diff options
| -rw-r--r-- | lisp/thumbs.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/thumbs.el b/lisp/thumbs.el index 1fbf2d224a2..13970e59ee8 100644 --- a/lisp/thumbs.el +++ b/lisp/thumbs.el | |||
| @@ -769,14 +769,15 @@ ACTION and ARG should be legal convert command." | |||
| 769 | (define-key map "r" 'thumbs-resize-interactive) | 769 | (define-key map "r" 'thumbs-resize-interactive) |
| 770 | (define-key map "s" 'thumbs-save-current-image) | 770 | (define-key map "s" 'thumbs-save-current-image) |
| 771 | (define-key map "q" 'thumbs-kill-buffer) | 771 | (define-key map "q" 'thumbs-kill-buffer) |
| 772 | (define-key map "w" 'thunbs-set-root) | 772 | (define-key map "w" 'thumbs-set-root) |
| 773 | map) | 773 | map) |
| 774 | "Keymap for `thumbs-view-image-mode'.") | 774 | "Keymap for `thumbs-view-image-mode'.") |
| 775 | 775 | ||
| 776 | ;; thumbs-view-image-mode | 776 | ;; thumbs-view-image-mode |
| 777 | (put 'thumbs-view-image-mode 'mode-class 'special) | 777 | (put 'thumbs-view-image-mode 'mode-class 'special) |
| 778 | (define-derived-mode thumbs-view-image-mode | 778 | (define-derived-mode thumbs-view-image-mode |
| 779 | fundamental-mode "image-view-mode") | 779 | fundamental-mode "image-view-mode" |
| 780 | (setq buffer-read-only t)) | ||
| 780 | 781 | ||
| 781 | ;;;###autoload | 782 | ;;;###autoload |
| 782 | (defun thumbs-dired-setroot () | 783 | (defun thumbs-dired-setroot () |