comparison src/buffer.c @ 18485:d6e8b92585e9

(Fbury_buffer): Undo previous change.

18484:fade5fd2fab4

{
  /* Figure out what buffer we're going to bury.  */
  if (NILP (buffer))
    {
      XSETBUFFER (buffer, current_buffer);
    }
  else
    {
      Lisp_Object buf1;
      
      buf1 = Fget_buffer (buffer);
      if (NILP (buf1))
	nsberror (buffer);
      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.  */
  {
    register Lisp_Object aelt, link;

18485:d6e8b92585e9

{
  /* Figure out what buffer we're going to bury.  */
  if (NILP (buffer))
    {
      XSETBUFFER (buffer, current_buffer);

      /* If we're burying the current buffer, unshow it.  */
      Fswitch_to_buffer (Fother_buffer (buffer, Qnil), Qnil);
    }
  else
    {
      Lisp_Object buf1;
      
      buf1 = Fget_buffer (buffer);
      if (NILP (buf1))
	nsberror (buffer);
      buffer = buf1;
    }

  /* Move buffer to the end of the buffer list.  */
  {
    register Lisp_Object aelt, link;