Mercurial > hg > xemacs-beta

comparison src/event-stream.c @ 2830:d7505a1267a4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2005-06-26 19:05:05 by aidan] Couple of build fixes--that'll teach me to spend the weekend doing something other than hacking XEmacs.
author aidan
date Sun, 26 Jun 2005 19:05:07 +0000
parents a25c824ed558
children b95fe16005fd
comparison
equal deleted inserted replaced
2829:714b354cef67 2830:d7505a1267a4
3589 newbuilder = copy_command_builder(builder, 0); 3589 newbuilder = copy_command_builder(builder, 0);
3590 GCPRO1(newbuilder); 3590 GCPRO1(newbuilder);
3591 3591
3592 newb = XCOMMAND_BUILDER(newbuilder); 3592 newb = XCOMMAND_BUILDER(newbuilder);
3593 3593
3594 XSET_EVENT_KEY_KEYSYM(event_chain_tail (newbuilder->current_events), 3594 XSET_EVENT_KEY_KEYSYM(event_chain_tail
3595 (XCOMMAND_BUILDER(newbuilder)->current_events),
3595 make_char(this_alternative)); 3596 make_char(this_alternative));
3596 3597
3597 result = command_builder_find_leaf_no_jit_binding 3598 result = command_builder_find_leaf_no_jit_binding
3598 (newb, allow_misc_user_events_p, did_munge); 3599 (newb, allow_misc_user_events_p, did_munge);
3599 3600
3600 if (!NILP (result)) 3601 if (!NILP (result))
3601 { 3602 {
3602 copy_command_builder (newb, builder); 3603 copy_command_builder (newb, builder);
3603 *did_munge = 1; 3604 *did_munge = 1;
3604 } 3605 }
3605 else if (event_upshifted_p (newbuilder->most_current_event) && 3606 else if (event_upshifted_p
3607 (XCOMMAND_BUILDER(newbuilder)->most_current_event) &&
3606 !NILP (Vretry_undefined_key_binding_unshifted) 3608 !NILP (Vretry_undefined_key_binding_unshifted)
3607 && isascii(this_alternative)) 3609 && isascii(this_alternative))
3608 { 3610 {
3609 downshift_event (event_chain_tail (newbuilder->current_events)); 3611 downshift_event (event_chain_tail
3610 XSET_EVENT_KEY_KEYSYM(event_chain_tail (newb->current_events), 3612 (XCOMMAND_BUILDER(newbuilder)->current_events));
3613 XSET_EVENT_KEY_KEYSYM(event_chain_tail
3614 (newb->current_events),
3611 make_char(tolower(this_alternative))); 3615 make_char(tolower(this_alternative)));
3612 result = command_builder_find_leaf_no_jit_binding 3616 result = command_builder_find_leaf_no_jit_binding
3613 (newb, allow_misc_user_events_p, did_munge); 3617 (newb, allow_misc_user_events_p, did_munge);
3614 } 3618 }
3615 3619