diff options
| author | Richard M. Stallman | 1993-03-21 06:50:50 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1993-03-21 06:50:50 +0000 |
| commit | d5b2799ef633ff34a942abb3c7d7ce12c0ccf425 (patch) | |
| tree | 6d38f4039876e28ec9f0e38d52bb3b76297b1fad /src/window.c | |
| parent | dba1ec5561d98290d8a450c5b3e939363e7f9176 (diff) | |
| download | emacs-d5b2799ef633ff34a942abb3c7d7ce12c0ccf425.tar.gz emacs-d5b2799ef633ff34a942abb3c7d7ce12c0ccf425.zip | |
(Fselect_window): Use Fhandle_switch_frame.
(Fset_window_configuration): Likewise.
Diffstat (limited to 'src/window.c')
| -rw-r--r-- | src/window.c | 15 |
1 files changed, 7 insertions, 8 deletions
diff --git a/src/window.c b/src/window.c index 962bc1ff50b..7c162cf2f37 100644 --- a/src/window.c +++ b/src/window.c | |||
| @@ -1567,7 +1567,7 @@ before each command.") | |||
| 1567 | if (XFRAME (WINDOW_FRAME (w)) != selected_frame) | 1567 | if (XFRAME (WINDOW_FRAME (w)) != selected_frame) |
| 1568 | { | 1568 | { |
| 1569 | XFRAME (WINDOW_FRAME (w))->selected_window = window; | 1569 | XFRAME (WINDOW_FRAME (w))->selected_window = window; |
| 1570 | Fselect_frame (WINDOW_FRAME (w), Qnil); | 1570 | Fhandle_switch_frame (WINDOW_FRAME (w), Qnil); |
| 1571 | } | 1571 | } |
| 1572 | else | 1572 | else |
| 1573 | selected_frame->selected_window = window; | 1573 | selected_frame->selected_window = window; |
| @@ -1632,7 +1632,7 @@ Returns the window displaying BUFFER.") | |||
| 1632 | = Fframe_selected_window (call0 (Vpop_up_frame_function)); | 1632 | = Fframe_selected_window (call0 (Vpop_up_frame_function)); |
| 1633 | Fset_window_buffer (window, buffer); | 1633 | Fset_window_buffer (window, buffer); |
| 1634 | #if 0 | 1634 | #if 0 |
| 1635 | Fselect_frame (XWINDOW (window)->frame, Qnil); | 1635 | Fhandle_switch_frame (XWINDOW (window)->frame, Qnil); |
| 1636 | #endif | 1636 | #endif |
| 1637 | return window; | 1637 | return window; |
| 1638 | } | 1638 | } |
| @@ -2436,9 +2436,8 @@ DEFUN ("window-configuration-p", Fwindow_configuration_p, Swindow_configuration_ | |||
| 2436 | } | 2436 | } |
| 2437 | 2437 | ||
| 2438 | 2438 | ||
| 2439 | DEFUN ("set-window-configuration", | 2439 | DEFUN ("set-window-configuration", Fset_window_configuration, |
| 2440 | Fset_window_configuration, Sset_window_configuration, | 2440 | Sset_window_configuration, 1, 1, 0, |
| 2441 | 1, 1, 0, | ||
| 2442 | "Set the configuration of windows and buffers as specified by CONFIGURATION.\n\ | 2441 | "Set the configuration of windows and buffers as specified by CONFIGURATION.\n\ |
| 2443 | CONFIGURATION must be a value previously returned\n\ | 2442 | CONFIGURATION must be a value previously returned\n\ |
| 2444 | by `current-window-configuration' (which see).") | 2443 | by `current-window-configuration' (which see).") |
| @@ -2614,7 +2613,7 @@ by `current-window-configuration' (which see).") | |||
| 2614 | when the frame's old selected window has been deleted. */ | 2613 | when the frame's old selected window has been deleted. */ |
| 2615 | #ifdef MULTI_FRAME | 2614 | #ifdef MULTI_FRAME |
| 2616 | if (f != selected_frame && ! FRAME_TERMCAP_P (f)) | 2615 | if (f != selected_frame && ! FRAME_TERMCAP_P (f)) |
| 2617 | Fselect_frame (WINDOW_FRAME (XWINDOW (data->root_window)), Qnil); | 2616 | Fhandle_switch_frame (WINDOW_FRAME (XWINDOW (data->root_window)), Qnil); |
| 2618 | #endif | 2617 | #endif |
| 2619 | #endif | 2618 | #endif |
| 2620 | 2619 | ||
| @@ -2627,12 +2626,12 @@ by `current-window-configuration' (which see).") | |||
| 2627 | 2626 | ||
| 2628 | #ifdef MULTI_FRAME | 2627 | #ifdef MULTI_FRAME |
| 2629 | /* Fselect_window will have made f the selected frame, so we | 2628 | /* Fselect_window will have made f the selected frame, so we |
| 2630 | reselect the proper frame here. Fselect_frame will change the | 2629 | reselect the proper frame here. Fhandle_switch_frame will change the |
| 2631 | selected window too, but that doesn't make the call to | 2630 | selected window too, but that doesn't make the call to |
| 2632 | Fselect_window above totally superfluous; it still sets f's | 2631 | Fselect_window above totally superfluous; it still sets f's |
| 2633 | selected window. */ | 2632 | selected window. */ |
| 2634 | if (FRAME_LIVE_P (XFRAME (data->selected_frame))) | 2633 | if (FRAME_LIVE_P (XFRAME (data->selected_frame))) |
| 2635 | Fselect_frame (data->selected_frame, Qnil); | 2634 | Fhandle_switch_frame (data->selected_frame, Qnil); |
| 2636 | #endif | 2635 | #endif |
| 2637 | 2636 | ||
| 2638 | if (!NILP (new_current_buffer)) | 2637 | if (!NILP (new_current_buffer)) |