|
From: | Stefan Monnier |
Subject: | Re: where-is-internal question |
Date: | Wed, 07 Sep 2005 11:11:46 -0400 |
User-agent: | Gnus/5.11 (Gnus v5.11) Emacs/22.0.50 (gnu/linux) |
> (if (boundp 'this-original-command) > (define-key my-map [remap self-insert-command] 'my-command) > (dolist (key (where-is-internal 'self-insert-command > global-map)) > (define-key my-map key 'my-command))) Also the above dolist is advantageously replaced by a call to substitute-key-definition (whose docstring mentions the use of the [remap <foo>] binding). Stefan
[Prev in Thread] | Current Thread | [Next in Thread] |