[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: key binding only for minor mode
From: |
Teemu Likonen |
Subject: |
Re: key binding only for minor mode |
Date: |
Fri, 28 Aug 2009 09:14:38 +0300 |
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/23.1.50 (gnu/linux) |
On 2009-08-27 19:01 (-0700), Ryo Furue wrote:
> I'm now trying to disable C-x C-q (normally bound to toggle-read-only)
> in the view mode, but I haven't been entirely successful. So far, I've
> been using local-set-key in the view-mode-hook:
>
> (add-hook 'view-mode-hook
> (lambda ()
> (local-set-key "\C-x\C-q"
> (lambda () (interactive) (message "C-x C-q disabled.") (ding)))))
>
> which woks---until you toggle off the view-mode by "M-x view-mode".
It's better to change the needed keymap (i.e., view-mode-map) directly:
(add-hook 'view-mode-hook #'my-view-mode-hook)
(defun my-view-mode-hook ()
(define-key view-mode-map (kbd "C-x C-q")
#'(lambda ()
(interactive)
(message "C-x C-q is disabled")
(ding))))