diff options
| author | Kenichi Handa | 2003-09-08 11:56:09 +0000 |
|---|---|---|
| committer | Kenichi Handa | 2003-09-08 11:56:09 +0000 |
| commit | 463f5630a5e7cbe7f042bc1175d1fa1c4e98860f (patch) | |
| tree | 3287d0c628fea2249abf4635b3a4f45bedd6f8c4 /src/callint.c | |
| parent | 4256310de631bd57c78b88b5131caa073315b3d7 (diff) | |
| download | emacs-463f5630a5e7cbe7f042bc1175d1fa1c4e98860f.tar.gz emacs-463f5630a5e7cbe7f042bc1175d1fa1c4e98860f.zip | |
New directory
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; | |||
| 41 | Lisp_Object Vcommand_history; | 41 | Lisp_Object Vcommand_history; |
| 42 | 42 | ||
| 43 | extern Lisp_Object Vhistory_length; | 43 | extern Lisp_Object Vhistory_length; |
| 44 | extern Lisp_Object Vthis_original_command, real_this_command; | ||
| 45 | 44 | ||
| 46 | Lisp_Object Vcommand_debug_status, Qcommand_debug_status; | 45 | Lisp_Object Vcommand_debug_status, Qcommand_debug_status; |
| 47 | Lisp_Object Qenable_recursive_minibuffers; | 46 | Lisp_Object Qenable_recursive_minibuffers; |
| @@ -292,14 +291,6 @@ supply if the command inquires which events were used to invoke it. */) | |||
| 292 | int key_count; | 291 | int key_count; |
| 293 | int record_then_fail = 0; | 292 | int record_then_fail = 0; |
| 294 | 293 | ||
| 295 | Lisp_Object save_this_command, save_last_command; | ||
| 296 | Lisp_Object save_this_original_command, save_real_this_command; | ||
| 297 | |||
| 298 | save_this_command = Vthis_command; | ||
| 299 | save_this_original_command = Vthis_original_command; | ||
| 300 | save_real_this_command = real_this_command; | ||
| 301 | save_last_command = current_kboard->Vlast_command; | ||
| 302 | |||
| 303 | if (NILP (keys)) | 294 | if (NILP (keys)) |
| 304 | keys = this_command_keys, key_count = this_command_key_count; | 295 | keys = this_command_keys, key_count = this_command_key_count; |
| 305 | else | 296 | else |
| @@ -404,12 +395,6 @@ supply if the command inquires which events were used to invoke it. */) | |||
| 404 | XSETCDR (teml, Qnil); | 395 | XSETCDR (teml, Qnil); |
| 405 | } | 396 | } |
| 406 | } | 397 | } |
| 407 | |||
| 408 | Vthis_command = save_this_command; | ||
| 409 | Vthis_original_command = save_this_original_command; | ||
| 410 | real_this_command= save_real_this_command; | ||
| 411 | current_kboard->Vlast_command = save_last_command; | ||
| 412 | |||
| 413 | single_kboard_state (); | 398 | single_kboard_state (); |
| 414 | return apply1 (function, specs); | 399 | return apply1 (function, specs); |
| 415 | } | 400 | } |
| @@ -856,11 +841,6 @@ supply if the command inquires which events were used to invoke it. */) | |||
| 856 | if (record_then_fail) | 841 | if (record_then_fail) |
| 857 | Fbarf_if_buffer_read_only (); | 842 | Fbarf_if_buffer_read_only (); |
| 858 | 843 | ||
| 859 | Vthis_command = save_this_command; | ||
| 860 | Vthis_original_command = save_this_original_command; | ||
| 861 | real_this_command= save_real_this_command; | ||
| 862 | current_kboard->Vlast_command = save_last_command; | ||
| 863 | |||
| 864 | single_kboard_state (); | 844 | single_kboard_state (); |
| 865 | 845 | ||
| 866 | { | 846 | { |
| @@ -998,6 +978,3 @@ a way to turn themselves off when a mouse command switches windows. */); | |||
| 998 | defsubr (&Scall_interactively); | 978 | defsubr (&Scall_interactively); |
| 999 | defsubr (&Sprefix_numeric_value); | 979 | defsubr (&Sprefix_numeric_value); |
| 1000 | } | 980 | } |
| 1001 | |||
| 1002 | /* arch-tag: a3a7cad7-bcac-42ce-916e-1bd2546ebf37 | ||
| 1003 | (do not change this comment) */ | ||