help-gnu-emacs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: local key swap? alternatives?


From: Stefan Monnier
Subject: Re: local key swap? alternatives?
Date: Fri, 09 Sep 2005 00:41:49 -0400
User-agent: Gnus/5.11 (Gnus v5.11) Emacs/22.0.50 (gnu/linux)

>> (defmacro define-my-insert (name char)
>> "Define the `my-NAME' command, to insert CHAR."
>> `(defun ,(intern (format "my-%s" name)) (&optional arg)
>> ,(format "Insert \"%c\" at point.
>> With a prefix ARG, insert that many characters."
>> char)
>> (interactive "p")
>> (insert-char ,char (or arg 1))))
>> 
>> (define-my-insert four ?4)
>> (define-my-insert dollar ?$)

Have you taken a look at key-translation-map?
Something like

  (define-key key-translation-map "4" "$")
  (define-key key-translation-map "$" "4")


-- Stefan


reply via email to

[Prev in Thread] Current Thread [Next in Thread]