diff options
Diffstat (limited to 'src/callint.c')
| -rw-r--r-- | src/callint.c | 23 |
1 files changed, 0 insertions, 23 deletions
diff --git a/src/callint.c b/src/callint.c index 21a6bd0b1ad..4edb4201fa4 100644 --- a/src/callint.c +++ b/src/callint.c @@ -41,7 +41,6 @@ Lisp_Object Qcall_interactively; Lisp_Object Vcommand_history; extern Lisp_Object Vhistory_length; -extern Lisp_Object Vthis_original_command, real_this_command; Lisp_Object Vcommand_debug_status, Qcommand_debug_status; Lisp_Object Qenable_recursive_minibuffers; @@ -292,14 +291,6 @@ supply if the command inquires which events were used to invoke it. */) int key_count; int record_then_fail = 0; - Lisp_Object save_this_command, save_last_command; - Lisp_Object save_this_original_command, save_real_this_command; - - save_this_command = Vthis_command; - save_this_original_command = Vthis_original_command; - save_real_this_command = real_this_command; - save_last_command = current_kboard->Vlast_command; - if (NILP (keys)) keys = this_command_keys, key_count = this_command_key_count; else @@ -404,12 +395,6 @@ supply if the command inquires which events were used to invoke it. */) XSETCDR (teml, Qnil); } } - - Vthis_command = save_this_command; - Vthis_original_command = save_this_original_command; - real_this_command= save_real_this_command; - current_kboard->Vlast_command = save_last_command; - single_kboard_state (); return apply1 (function, specs); } @@ -856,11 +841,6 @@ supply if the command inquires which events were used to invoke it. */) if (record_then_fail) Fbarf_if_buffer_read_only (); - Vthis_command = save_this_command; - Vthis_original_command = save_this_original_command; - real_this_command= save_real_this_command; - current_kboard->Vlast_command = save_last_command; - single_kboard_state (); { @@ -998,6 +978,3 @@ a way to turn themselves off when a mouse command switches windows. */); defsubr (&Scall_interactively); defsubr (&Sprefix_numeric_value); } - -/* arch-tag: a3a7cad7-bcac-42ce-916e-1bd2546ebf37 - (do not change this comment) */ |