Mercurial > emacs
comparison src/buffer.c @ 3785:3455cbb3339d
Don't let the 'B' interactive spec default to buffers viewed in
any visible frame.
* buffer.c (Fother_buffer): Pass Qvisible as the second argument
to Fget_buffer_window.
* window.c (Qvisible): New symbol.
(window_loop): In GET_BUFFER_WINDOW case, if frames is Qvisible,
ignore non-visible frames.
(Fget_buffer_window): Expand doc string to mention that Qvisible
is an interesting value for FRAME argument.
(syms_of_window): Init and staticpro Qvisible.
* lisp.h (Qvisible): New declaration.
| author | Jim Blandy <jimb@redhat.com> |
|---|---|
| date | Thu, 17 Jun 1993 00:39:37 +0000 |
| parents | 16948869ab5b |
| children | 594bc11c67ba |
comparison
equal
deleted
inserted
replaced
| 3784:d2df5ca46b39 | 3785:3455cbb3339d |
|---|---|
| 583 if (EQ (buf, buffer)) | 583 if (EQ (buf, buffer)) |
| 584 continue; | 584 continue; |
| 585 if (XSTRING (XBUFFER (buf)->name)->data[0] == ' ') | 585 if (XSTRING (XBUFFER (buf)->name)->data[0] == ' ') |
| 586 continue; | 586 continue; |
| 587 if (NILP (visible_ok)) | 587 if (NILP (visible_ok)) |
| 588 tem = Fget_buffer_window (buf, Qnil); | 588 tem = Fget_buffer_window (buf, Qvisible); |
| 589 else | 589 else |
| 590 tem = Qnil; | 590 tem = Qnil; |
| 591 if (NILP (tem)) | 591 if (NILP (tem)) |
| 592 return buf; | 592 return buf; |
| 593 if (NILP (notsogood)) | 593 if (NILP (notsogood)) |
