Hrvoje Niksic writes:
Colin Rafferty <colin(a)xemacs.org> writes:
> Hrvoje Niksic writes:
> > (global-set-key 'Cyrillic_HARDSIGN
'self-insert-command)
> > (put 'Cyrillic_HARDSIGN 'ascii-character ?\xff)
> How would I do this for something other than an actual key.
> (bind-key-sequence-to-symbol [('alt ?a)] 'ALT_A)
> (global-set-key 'ALT_A 'self-insert-command)
> (put 'ALT_A 'ascii-character ?\301)
...
But then I remembered that "keysyms" aren't really cast
in stone, and
that with a little trickery you can fake keysyms from Lisp. Here is
the result:
(global-set-key '(alt a) [fake-keysym])
(global-set-key 'fake-keysym 'self-insert-command)
(put 'fake-keysym 'ascii-character ?\301)
Thank you very much Hrvoje. This is exactly what I needed.
I think I understand key bindings a little but more now.
--
Colin