diff options
Diffstat (limited to 'lisp/window.el')
| -rw-r--r-- | lisp/window.el | 24 |
1 files changed, 21 insertions, 3 deletions
diff --git a/lisp/window.el b/lisp/window.el index 39f4fa139bb..a8b65657a49 100644 --- a/lisp/window.el +++ b/lisp/window.el | |||
| @@ -4697,6 +4697,8 @@ displayed there." | |||
| 4697 | BUFFER-OR-NAME may be a buffer or the name of an existing buffer | 4697 | BUFFER-OR-NAME may be a buffer or the name of an existing buffer |
| 4698 | and defaults to the current buffer. | 4698 | and defaults to the current buffer. |
| 4699 | 4699 | ||
| 4700 | Interactively, prompt for the buffer. | ||
| 4701 | |||
| 4700 | The following non-nil values of the optional argument FRAME | 4702 | The following non-nil values of the optional argument FRAME |
| 4701 | have special meanings: | 4703 | have special meanings: |
| 4702 | 4704 | ||
| @@ -4713,9 +4715,25 @@ have special meanings: | |||
| 4713 | Any other value of FRAME means consider all windows on all | 4715 | Any other value of FRAME means consider all windows on all |
| 4714 | frames. | 4716 | frames. |
| 4715 | 4717 | ||
| 4716 | When a window showing BUFFER-OR-NAME is dedicated and the only | 4718 | Interactively, FRAME is the prefix argument, so you can |
| 4717 | window of its frame, that frame is deleted when there are other | 4719 | use \\[universal-argument] 0 to specify all windows only on |
| 4718 | frames left." | 4720 | the current terminal's frames. |
| 4721 | |||
| 4722 | If a frame's root window shows the buffer specified by | ||
| 4723 | BUFFER-OR-NAME and is dedicated to that buffer and that frame | ||
| 4724 | does not host the active minibuffer window and there is at least | ||
| 4725 | one other frame on that frame's terminal, delete that frame. | ||
| 4726 | Otherwise, do not delete a frame's root window if it shows the | ||
| 4727 | buffer specified by BUFFER-OR-NAME and do not delete any frame's | ||
| 4728 | main window showing that buffer either. Rather, in any such | ||
| 4729 | case, call `switch-to-prev-buffer' to show another buffer in that | ||
| 4730 | window and make sure the window is no more dedicated to its | ||
| 4731 | buffer. | ||
| 4732 | |||
| 4733 | If the buffer specified by BUFFER-OR-NAME is shown in a | ||
| 4734 | minibuffer window, do nothing for that window. For any window | ||
| 4735 | that does not show that buffer, remove the buffer from that | ||
| 4736 | window's lists of previous and next buffers." | ||
| 4719 | (interactive "bDelete windows on (buffer):\nP") | 4737 | (interactive "bDelete windows on (buffer):\nP") |
| 4720 | (let ((buffer (window-normalize-buffer buffer-or-name)) | 4738 | (let ((buffer (window-normalize-buffer buffer-or-name)) |
| 4721 | ;; Handle the "inverted" meaning of the FRAME argument wrt other | 4739 | ;; Handle the "inverted" meaning of the FRAME argument wrt other |