From 288f8357fd2857b83eee4e409f79b231dced44e2 Mon Sep 17 00:00:00 2001 From: John Paul Wallington Date: Sat, 4 Sep 2004 18:34:30 +0000 Subject: [PATCH] (thumbs-view-image-mode-map): Fix `thumbs-set-root' command name typo. (thumbs-view-image-mode): Make buffer read-only. --- lisp/thumbs.el | 5 +++-- 1 file 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." (define-key map "r" 'thumbs-resize-interactive) (define-key map "s" 'thumbs-save-current-image) (define-key map "q" 'thumbs-kill-buffer) - (define-key map "w" 'thunbs-set-root) + (define-key map "w" 'thumbs-set-root) map) "Keymap for `thumbs-view-image-mode'.") ;; thumbs-view-image-mode (put 'thumbs-view-image-mode 'mode-class 'special) (define-derived-mode thumbs-view-image-mode - fundamental-mode "image-view-mode") + fundamental-mode "image-view-mode" + (setq buffer-read-only t)) ;;;###autoload (defun thumbs-dired-setroot () -- 2.39.2