From: Kevin Rodgers <ihs_4664@yahoo.com>
Subject: Re: Alt as meta, except for certain keys, how?
Date: Fri, 08 Aug 2003 12:51:59 -0600 [thread overview]
Message-ID: <3F33F14F.2060903@yahoo.com> (raw)
In-Reply-To: mailman.222.1060326618.29551.help-gnu-emacs@gnu.org
Ehud Karni wrote:
> -----BEGIN PGP SIGNED MESSAGE-----
> Hash: SHA1
>
> On Thu, 07 Aug 2003 12:38:54 -0600, Kevin Rodgers <ihs_4664@yahoo.com> wrote:
>>(keyboard-translate ?\M-7 ?|) doesn't work, because keyboard-translate-table
>>is a char-table, which only handles unmodified characters.
>>
>
> You can find the character value of any key by the following function:
>
> (defun get-char-value () "get decimal value of any key"
> (interactive)
> (let (char
> desc)
> (message "Type any char - " )
> (setq char (read-event))
> (if (not char)
> (message "Non char event - no value")
> (condition-case ()
> (setq desc (text-char-description char))
> (error
> (setq desc "(No description)")))
> (if (numberp char)
> (message "Character typed is %s, (octal=%03o, decimal=%d, hexa=%02x)"
> desc char char char)
> (message "Input typed is %s, not a number" (prin1-to-string char t))))))
Overkill.
> On my system it shows for Alt-7:
> Character typed is "7", (octal=20000067, decimal=4194359, hexa=400037)
Just evaluate ?\M-7. On my system, it is -134217673, which is the crux of the
problem: meta-modified characters may have a negative character code, and thus
may not be a valid index into a char-table.
> So if you do:
> (define-key key-translation-map [4194359] "|")
key-translation-map takes character arguments, not (vector or string) keys:
wrong-type-argument integerp [-134217673]
> It will do what you want (in all modes and maps - including isearch).
But on my system, that signals an args-out-of-range error:
args-out-of-range #^[t nil nil nil ...] -134217673
> Because key-translation-map may not exist, you better protect yourself
> by adding the following (before the define-key command):
> (if (not key-translation-map)
> (make-sparse-keymap key-translation-map))
key-translation-map is now a char-table, not a keymap (see the Translating Input
node of the Emacs Lisp manual).
--
Kevin Rodgers
next prev parent reply other threads:[~2003-08-08 18:51 UTC|newest]
Thread overview: 14+ messages / expand[flat|nested] mbox.gz Atom feed top
2003-08-07 17:33 Alt as meta, except for certain keys, how? Jussi Piitulainen
2003-08-07 18:38 ` Kevin Rodgers
2003-08-08 7:05 ` Ehud Karni
[not found] ` <mailman.222.1060326618.29551.help-gnu-emacs@gnu.org>
2003-08-08 18:51 ` Kevin Rodgers [this message]
2003-08-08 21:26 ` Ehud Karni
[not found] ` <mailman.235.1060378027.29551.help-gnu-emacs@gnu.org>
2003-08-11 18:10 ` Jussi Piitulainen
2003-08-11 20:29 ` Kevin Rodgers
2003-08-12 8:26 ` Jussi Piitulainen
2003-08-12 17:14 ` Kevin Rodgers
2003-08-13 5:14 ` Jussi Piitulainen
2003-08-15 13:05 ` Kai Großjohann
2003-08-11 19:54 ` Kevin Rodgers
2003-08-12 11:13 ` Ehud Karni
[not found] ` <mailman.336.1060687053.29551.help-gnu-emacs@gnu.org>
2003-08-12 18:16 ` Jussi Piitulainen
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=3F33F14F.2060903@yahoo.com \
--to=ihs_4664@yahoo.com \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this external index
https://git.savannah.gnu.org/cgit/emacs.git
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.