diff options
| author | Martin Rudalics | 2019-03-05 11:01:14 +0100 |
|---|---|---|
| committer | Martin Rudalics | 2019-03-05 11:01:14 +0100 |
| commit | 9b93e3b0759d562989283eaecf32e075f984c18c (patch) | |
| tree | 83fbe2ef8cd2c22b0ffe9f574e740722c16835e3 | |
| parent | a552cc21dc324b1be71c181684b0ab2e6cf0a60f (diff) | |
| download | emacs-9b93e3b0759d562989283eaecf32e075f984c18c.tar.gz emacs-9b93e3b0759d562989283eaecf32e075f984c18c.zip | |
Fix interactive spec of some functions in window.el (Bug#34749)
* lisp/window.el (delete-windows-on, quit-windows-on)
(display-buffer-other-frame): Interactively, permit existing
buffers only (Bug#34749).
| -rw-r--r-- | lisp/window.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/window.el b/lisp/window.el index 80828bb35c8..9566429627d 100644 --- a/lisp/window.el +++ b/lisp/window.el | |||
| @@ -4711,7 +4711,7 @@ frames. | |||
| 4711 | When a window showing BUFFER-OR-NAME is dedicated and the only | 4711 | When a window showing BUFFER-OR-NAME is dedicated and the only |
| 4712 | window of its frame, that frame is deleted when there are other | 4712 | window of its frame, that frame is deleted when there are other |
| 4713 | frames left." | 4713 | frames left." |
| 4714 | (interactive "BDelete windows on (buffer):\nP") | 4714 | (interactive "bDelete windows on (buffer):\nP") |
| 4715 | (let ((buffer (window-normalize-buffer buffer-or-name)) | 4715 | (let ((buffer (window-normalize-buffer buffer-or-name)) |
| 4716 | ;; Handle the "inverted" meaning of the FRAME argument wrt other | 4716 | ;; Handle the "inverted" meaning of the FRAME argument wrt other |
| 4717 | ;; `window-list-1' based function. | 4717 | ;; `window-list-1' based function. |
| @@ -4894,7 +4894,7 @@ BUFFER-OR-NAME. Optional argument FRAME is handled as by | |||
| 4894 | 4894 | ||
| 4895 | This function calls `quit-window' on all candidate windows | 4895 | This function calls `quit-window' on all candidate windows |
| 4896 | showing BUFFER-OR-NAME." | 4896 | showing BUFFER-OR-NAME." |
| 4897 | (interactive "BQuit windows on (buffer):\nP") | 4897 | (interactive "bQuit windows on (buffer):\nP") |
| 4898 | (let ((buffer (window-normalize-buffer buffer-or-name)) | 4898 | (let ((buffer (window-normalize-buffer buffer-or-name)) |
| 4899 | ;; Handle the "inverted" meaning of the FRAME argument wrt other | 4899 | ;; Handle the "inverted" meaning of the FRAME argument wrt other |
| 4900 | ;; `window-list-1' based function. | 4900 | ;; `window-list-1' based function. |
| @@ -7188,7 +7188,7 @@ on all the frames on the current terminal, skipping the selected | |||
| 7188 | window; if that fails, it pops up a new frame. | 7188 | window; if that fails, it pops up a new frame. |
| 7189 | This uses the function `display-buffer' as a subroutine; see | 7189 | This uses the function `display-buffer' as a subroutine; see |
| 7190 | its documentation for additional customization information." | 7190 | its documentation for additional customization information." |
| 7191 | (interactive "BDisplay buffer in other frame: ") | 7191 | (interactive "bDisplay buffer in other frame: ") |
| 7192 | (display-buffer buffer display-buffer--other-frame-action t)) | 7192 | (display-buffer buffer display-buffer--other-frame-action t)) |
| 7193 | 7193 | ||
| 7194 | ;;; `display-buffer' action functions: | 7194 | ;;; `display-buffer' action functions: |