769 |
(define-key map "r" 'thumbs-resize-interactive) |
(define-key map "r" 'thumbs-resize-interactive) |
770 |
(define-key map "s" 'thumbs-save-current-image) |
(define-key map "s" 'thumbs-save-current-image) |
771 |
(define-key map "q" 'thumbs-kill-buffer) |
(define-key map "q" 'thumbs-kill-buffer) |
772 |
(define-key map "w" 'thunbs-set-root) |
(define-key map "w" 'thumbs-set-root) |
773 |
map) |
map) |
774 |
"Keymap for `thumbs-view-image-mode'.") |
"Keymap for `thumbs-view-image-mode'.") |
775 |
|
|
776 |
;; thumbs-view-image-mode |
;; thumbs-view-image-mode |
777 |
(put 'thumbs-view-image-mode 'mode-class 'special) |
(put 'thumbs-view-image-mode 'mode-class 'special) |
778 |
(define-derived-mode thumbs-view-image-mode |
(define-derived-mode thumbs-view-image-mode |
779 |
fundamental-mode "image-view-mode") |
fundamental-mode "image-view-mode" |
780 |
|
(setq buffer-read-only t)) |
781 |
|
|
782 |
;;;###autoload |
;;;###autoload |
783 |
(defun thumbs-dired-setroot () |
(defun thumbs-dired-setroot () |