Can one put a function into function-key-map?
Alan Mackenzie writes:
I would like to put functions into function-key-map as the bindings
of a
key sequence, something like:
(define-key function-key-map [?\e ?\[ ?1 ?}] 'kn-prefix-control)
, the intention being that on receiving the key sequence ESC [ 1 },
the control modifier will be added to the next key received.
No, this doesn't work. In XEmacs, function-key-map doesn't call any
Lisp, it's a pure substitution of keystrokes for keystrokes. (More or
less.)
If there isn't the possibility of functions here, is there some
other way to do what I want?
The only thing I can think of is to bind ESC [ 1 } to a function that
reads a key, modifies the event to add the control modifier, and
stuffs the key back in the event queue.
What's the use case? Some kind of accessibility code? XEmacs does
support "sticky modifiers", in which case you might be able to simply
do
(define-key function-key-map [?\e ?\[ ?1 ?}] 'control-l)
(or something like that, I'm not sure what the names of the control
keysyms are offhand), with `modifier-keys-are-sticky' non-nil. I
can't guarantee that will work though, as accessiblity may be
implemented at a lower level.
_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta(a)xemacs.org
http://lists.xemacs.org/mailman/listinfo/xemacs-beta