Mercurial > emacs

comparison src/frame.c @ 8586:c78654909acf

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(Fmake_frame_invisible, Ficonify_frame): Don't switch frames.
author Karl Heuer <kwzh@gnu.org>
date Tue, 23 Aug 1994 06:55:46 +0000
parents 8f227ebb7748
children 844edbc22875
comparison
equal deleted inserted replaced
8585:f9d1fe1ed6ec 8586:c78654909acf
1110 CHECK_LIVE_FRAME (frame, 0); 1110 CHECK_LIVE_FRAME (frame, 0);
1111 1111
1112 if (NILP (force) && !other_visible_frames (XFRAME (frame))) 1112 if (NILP (force) && !other_visible_frames (XFRAME (frame)))
1113 error ("Attempt to make invisible the sole visible or iconified frame"); 1113 error ("Attempt to make invisible the sole visible or iconified frame");
1114 1114
1115 #if 0 /* This isn't logically necessary, and it can do GC. */
1115 /* Don't let the frame remain selected. */ 1116 /* Don't let the frame remain selected. */
1116 if (XFRAME (frame) == selected_frame) 1117 if (XFRAME (frame) == selected_frame)
1117 Fhandle_switch_frame (next_frame (frame, Qt), Qnil); 1118 Fhandle_switch_frame (next_frame (frame, Qt), Qnil);
1119 #endif
1118 1120
1119 /* Don't allow minibuf_window to remain on a deleted frame. */ 1121 /* Don't allow minibuf_window to remain on a deleted frame. */
1120 if (EQ (XFRAME (frame)->minibuffer_window, minibuf_window)) 1122 if (EQ (XFRAME (frame)->minibuffer_window, minibuf_window))
1121 { 1123 {
1122 Fset_window_buffer (selected_frame->minibuffer_window, 1124 Fset_window_buffer (selected_frame->minibuffer_window,
1146 if (NILP (frame)) 1148 if (NILP (frame))
1147 XSET (frame, Lisp_Frame, selected_frame); 1149 XSET (frame, Lisp_Frame, selected_frame);
1148 1150
1149 CHECK_LIVE_FRAME (frame, 0); 1151 CHECK_LIVE_FRAME (frame, 0);
1150 1152
1153 #if 0 /* This isn't logically necessary, and it can do GC. */
1151 /* Don't let the frame remain selected. */ 1154 /* Don't let the frame remain selected. */
1152 if (XFRAME (frame) == selected_frame) 1155 if (XFRAME (frame) == selected_frame)
1153 Fhandle_switch_frame (next_frame (frame, Qt), Qnil); 1156 Fhandle_switch_frame (next_frame (frame, Qt), Qnil);
1157 #endif
1154 1158
1155 /* Don't allow minibuf_window to remain on a deleted frame. */ 1159 /* Don't allow minibuf_window to remain on a deleted frame. */
1156 if (EQ (XFRAME (frame)->minibuffer_window, minibuf_window)) 1160 if (EQ (XFRAME (frame)->minibuffer_window, minibuf_window))
1157 { 1161 {
1158 Fset_window_buffer (selected_frame->minibuffer_window, 1162 Fset_window_buffer (selected_frame->minibuffer_window,