Mercurial > hg > xemacs-beta
diff src/event-stream.c @ 5691:b490ddbd42aa
Back out 7371081ce8f7, I have a better approach.
author | Aidan Kehoe <kehoea@parhasard.net> |
---|---|
date | Tue, 06 Nov 2012 21:34:15 +0000 |
parents | 7371081ce8f7 |
children | fffa15138019 |
line wrap: on
line diff
--- a/src/event-stream.c Mon Oct 15 20:47:00 2012 +0200 +++ b/src/event-stream.c Tue Nov 06 21:34:15 2012 +0000 @@ -4550,6 +4550,8 @@ int magic_undo = 0; Elemcount magic_undo_count = 20; + Vthis_command = leaf; + /* Don't push an undo boundary if the command set the prefix arg, or if we are executing a keyboard macro, or if in the minibuffer. If the command we are about to execute is @@ -4565,8 +4567,6 @@ if (SYMBOLP (leaf)) { Lisp_Object prop = Fget (leaf, Qself_insert_defer_undo, Qnil); - Lisp_Object remap = Qnil; - if (NATNUMP (prop)) { magic_undo = 1; @@ -4587,16 +4587,8 @@ magic_undo = 1; else if (EQ (leaf, Qself_insert_command)) magic_undo = 1; - - remap = command_remapping_for_event (leaf, event); - if (!NILP (remap)) - { - leaf = remap; - } } - Vthis_command = leaf; - if (!magic_undo) command_builder->self_insert_countdown = 0; if (NILP (XCONSOLE (console)->prefix_arg)