Commit 435bc840 authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(Fbury_buffer): If buffer is in selected window, remove it.

Otherwise, remove it from other windows.
parent e2b30772
...@@ -1534,9 +1534,6 @@ selected window if it is displayed there.") ...@@ -1534,9 +1534,6 @@ selected window if it is displayed there.")
if (NILP (buffer)) if (NILP (buffer))
{ {
XSETBUFFER (buffer, current_buffer); XSETBUFFER (buffer, current_buffer);
/* If we're burying the current buffer, unshow it. */
Fswitch_to_buffer (Fother_buffer (buffer, Qnil), Qnil);
} }
else else
{ {
...@@ -1548,6 +1545,13 @@ selected window if it is displayed there.") ...@@ -1548,6 +1545,13 @@ selected window if it is displayed there.")
buffer = buf1; buffer = buf1;
} }
/* Unshow the buffer in the selected window, if it is there. */
if (EQ (XWINDOW (selected_window)->buffer, buffer))
Fswitch_to_buffer (Fother_buffer (buffer, Qnil), Qnil);
/* Otherwise, unshow it in other frames. */
else
Freplace_buffer_in_windows (buffer);
/* Move buffer to the end of the buffer list. */ /* Move buffer to the end of the buffer list. */
{ {
register Lisp_Object aelt, link; register Lisp_Object aelt, link;
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment