Mercurial > emacs
diff lib-src/yow.c @ 2045:cc85a38463b8
(follow_key): Downcase shift_modifier as well as ASCII.
(command_loop_1): Run pre-command-hook and post-command-hook.
Set this_command before running pre-command-hook.
(syms_of_keyboard): Set up vars for those hooks.
(syms_of_keyboard): Handle gaps in modifier_names.
(modifier_names): Reorder to match termhooks.h.
(parse_modifiers_uncached): Detect `s-', not `super-'.
(apply_modifiers_uncached): Make `s-', not `super-'.
(lispy_function_keys): Add codes starting at 0xff00
and running through 0xffff.
(read_char): Move metabit when fetching from string macro.
(command_loop_1): Clear Vdeactivate_mark before cmd.
Clear mark_active if command set Vdeactivate_mark.
Run deactivate-mark-hook at that time, or activate-mark-hook.
(syms_of_keyboard): Define variable deactivate-mark.
(syms_of_keyboard): New lisp var unread-command-char.
(Finput_pending_p): Test unread_command_char.
(Fdiscard_input, quit_throw_to_read_char, init_keyboard): Set it.
(read_char): Fetch from it.
(Fthis_command_keys, Fread_key_sequence):
Fix calls to make_event_array.
(make_lispy_event): Put meta and shift modifiers
into an integer.
(read_avail_input): Set the modifiers field in the events read.
(kbd_buffer_get_event): Pass thru integer event untruncated.
(read_char): Likewise.
(read_key_sequence, read_char): Only -1 means EOF.
(kbd_buffer_store_event): Don't ignore 0200 bit in quit char.
(follow_key): Use new meta bit flag.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Sun, 07 Mar 1993 09:27:28 +0000 |
parents | 78165914b12d |
children | 507f64624555 |