diff options
| author | Stefan Monnier | 2005-03-19 16:37:27 +0000 |
|---|---|---|
| committer | Stefan Monnier | 2005-03-19 16:37:27 +0000 |
| commit | 6027e473edbfd0ba45ba7c3a121aea6b234389af (patch) | |
| tree | b55214591a20a0654f2b37c38db9b103a2d39b5f /src | |
| parent | a18bf8979eefd6716b8755755781e14f86d2c8ab (diff) | |
| download | emacs-6027e473edbfd0ba45ba7c3a121aea6b234389af.tar.gz emacs-6027e473edbfd0ba45ba7c3a121aea6b234389af.zip | |
(Fignore_event): Remove.
(syms_of_frame): Don't defsubr it.
Diffstat (limited to 'src')
| -rw-r--r-- | src/ChangeLog | 10 | ||||
| -rw-r--r-- | src/frame.c | 27 |
2 files changed, 9 insertions, 28 deletions
diff --git a/src/ChangeLog b/src/ChangeLog index 9a9b706ad1d..7b85f12f1b7 100644 --- a/src/ChangeLog +++ b/src/ChangeLog | |||
| @@ -1,3 +1,11 @@ | |||
| 1 | 2005-03-19 Stefan Monnier <monnier@iro.umontreal.ca> | ||
| 2 | |||
| 3 | * frame.c (Fignore_event): Remove. | ||
| 4 | (syms_of_frame): Don't defsubr it. | ||
| 5 | |||
| 6 | * keyboard.c (keys_of_keyboard): Just use `ignore' instead of the | ||
| 7 | redundant `ignore-event'. | ||
| 8 | |||
| 1 | 2005-03-19 Eli Zaretskii <eliz@gnu.org> | 9 | 2005-03-19 Eli Zaretskii <eliz@gnu.org> |
| 2 | 10 | ||
| 3 | * unexec.c (write_segment, unexec): Move these functions to avoid | 11 | * unexec.c (write_segment, unexec): Move these functions to avoid |
| @@ -5,7 +13,7 @@ | |||
| 5 | 13 | ||
| 6 | 2005-03-18 Jan Dj,Ad(Brv <jan.h.d@swipnet.se> | 14 | 2005-03-18 Jan Dj,Ad(Brv <jan.h.d@swipnet.se> |
| 7 | 15 | ||
| 8 | * xfns.c (x_create_tip_frame): Removed setting of Vx_resource_name so | 16 | * xfns.c (x_create_tip_frame): Remove setting of Vx_resource_name so |
| 9 | that it doesn't become "tooltip". The specbind is enough. | 17 | that it doesn't become "tooltip". The specbind is enough. |
| 10 | 18 | ||
| 11 | * xrdb.c (x_load_resources): Use different char *helv when I18N | 19 | * xrdb.c (x_load_resources): Use different char *helv when I18N |
diff --git a/src/frame.c b/src/frame.c index ce48a3f5fbe..d86d29db289 100644 --- a/src/frame.c +++ b/src/frame.c | |||
| @@ -765,32 +765,6 @@ to that frame. */) | |||
| 765 | return do_switch_frame (event, 0, 0); | 765 | return do_switch_frame (event, 0, 0); |
| 766 | } | 766 | } |
| 767 | 767 | ||
| 768 | DEFUN ("ignore-event", Fignore_event, Signore_event, 0, 0, "", | ||
| 769 | doc: /* Do nothing. | ||
| 770 | This is a suitable binding for `iconify-frame' and `make-frame-visible'. */) | ||
| 771 | () | ||
| 772 | { | ||
| 773 | /* Contrary to `handle-switch-frame', `ignore-event' is used from | ||
| 774 | `special-event-map'. Commands from that map are run in a special | ||
| 775 | way that automatically preserves the prefix-arg. Restoring | ||
| 776 | the prefix arg here is not just redundant but harmful: | ||
| 777 | - C-u C-x v = | ||
| 778 | - current-prefix-arg is set to non-nil, prefix-arg is set to nil. | ||
| 779 | - after the first prompt, the exit-minibuffer-hook is run which may | ||
| 780 | iconify a frame and thus push a `iconify-frame' event. | ||
| 781 | - after running exit-minibuffer-hook, current-prefix-arg is | ||
| 782 | restored to the non-nil value it had before the prompt. | ||
| 783 | - we enter the second prompt. | ||
| 784 | current-prefix-arg is non-nil, prefix-arg is nil. | ||
| 785 | - before running the first real event, we run the special iconify-frame | ||
| 786 | event, but we pass the `special' arg to execute-command so | ||
| 787 | current-prefix-arg and prefix-arg are left untouched. | ||
| 788 | - here we foolishly copy the non-nil current-prefix-arg to prefix-arg. | ||
| 789 | - the next key event will have a spuriously non-nil current-prefix-arg. | ||
| 790 | current_kboard->Vprefix_arg = Vcurrent_prefix_arg; */ | ||
| 791 | return Qnil; | ||
| 792 | } | ||
| 793 | |||
| 794 | DEFUN ("selected-frame", Fselected_frame, Sselected_frame, 0, 0, 0, | 768 | DEFUN ("selected-frame", Fselected_frame, Sselected_frame, 0, 0, 0, |
| 795 | doc: /* Return the frame that is now selected. */) | 769 | doc: /* Return the frame that is now selected. */) |
| 796 | () | 770 | () |
| @@ -4127,7 +4101,6 @@ This variable is local to the current terminal and cannot be buffer-local. */); | |||
| 4127 | defsubr (&Sframe_live_p); | 4101 | defsubr (&Sframe_live_p); |
| 4128 | defsubr (&Smake_terminal_frame); | 4102 | defsubr (&Smake_terminal_frame); |
| 4129 | defsubr (&Shandle_switch_frame); | 4103 | defsubr (&Shandle_switch_frame); |
| 4130 | defsubr (&Signore_event); | ||
| 4131 | defsubr (&Sselect_frame); | 4104 | defsubr (&Sselect_frame); |
| 4132 | defsubr (&Sselected_frame); | 4105 | defsubr (&Sselected_frame); |
| 4133 | defsubr (&Swindow_frame); | 4106 | defsubr (&Swindow_frame); |