[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Emacs's Command Frequency and default keyboard shortcuts
From: |
Stefan Monnier |
Subject: |
Re: Emacs's Command Frequency and default keyboard shortcuts |
Date: |
Tue, 17 Oct 2006 22:00:21 -0400 |
User-agent: |
Gnus/5.11 (Gnus v5.11) Emacs/22.0.50 (gnu/linux) |
> (define-minor-mode caps-lock-mode
> "When enabled, all self-inserting characters will be converted to
> uppercase."
> :lighter " CapsLock"
> (if caps-lock-mode
> (local-set-key [remap self-insert-command] 'self-insert-upcased)
> (local-unset-key [remap self-insert-command])))
You mean
(defvar caps-lock-mode-map
(let ((map (make-sparse-keymap)))
(define-key map [remap self-insert-command] 'self-insert-upcased)
map))
(define-minor-mode caps-lock-mode
"When enabled, convert all self-inserting characters to uppercase."
:lighter " CapsLock")
-- Stefan