comparison src/buffer.c @ 108880:f4a583b69ffa

* src/buffer.c (Fother_buffer): Add CHECK_FRAME. (Fswitch_to_buffer): Remove unused variable `err'.

108879:30e304f37b04

  notsogood = Qnil;

  if (NILP (frame))
    frame = selected_frame;

  tail = Vbuffer_alist;
  pred = frame_buffer_predicate (frame);

  /* Consider buffers that have been seen in the selected frame
     before other buffers.  */

within a Lisp program!  Use `set-buffer' instead.  That avoids
messing with the window-buffer correspondences.  */)
     (buffer_or_name, norecord)
     Lisp_Object buffer_or_name, norecord;
{
  char *err;

  if (EQ (buffer_or_name, Fwindow_buffer (selected_window)))
    {
      /* Basically a NOP.  Avoid signalling an error in the case where
	 the selected window is dedicated, or a minibuffer.  */

108880:f4a583b69ffa

  notsogood = Qnil;

  if (NILP (frame))
    frame = selected_frame;

  CHECK_FRAME (frame);

  tail = Vbuffer_alist;
  pred = frame_buffer_predicate (frame);

  /* Consider buffers that have been seen in the selected frame
     before other buffers.  */

within a Lisp program!  Use `set-buffer' instead.  That avoids
messing with the window-buffer correspondences.  */)
     (buffer_or_name, norecord)
     Lisp_Object buffer_or_name, norecord;
{
  if (EQ (buffer_or_name, Fwindow_buffer (selected_window)))
    {
      /* Basically a NOP.  Avoid signalling an error in the case where
	 the selected window is dedicated, or a minibuffer.  */