diff options
| author | Chong Yidong | 2011-11-20 14:37:46 +0800 |
|---|---|---|
| committer | Chong Yidong | 2011-11-20 14:37:46 +0800 |
| commit | 24901d610c9ff524e7e7c132dca1cd4312368db0 (patch) | |
| tree | f0c4e749dd56cfbfa3e6e6b1740b2a9d88f77cdb | |
| parent | 24f3d7b94b364021df18c43c3e7fe4211974ccf9 (diff) | |
| download | emacs-24901d610c9ff524e7e7c132dca1cd4312368db0.tar.gz emacs-24901d610c9ff524e7e7c132dca1cd4312368db0.zip | |
* lisp/window.el (replace-buffer-in-windows): Restore interactive spec.
(Probably inadvertently removed when converting to Lisp.)
| -rw-r--r-- | lisp/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/window.el | 1 |
2 files changed, 5 insertions, 0 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index e6f1bc55bf2..db79fdc3b56 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,7 @@ | |||
| 1 | 2011-11-20 Chong Yidong <cyd@gnu.org> | ||
| 2 | |||
| 3 | * window.el (replace-buffer-in-windows): Restore interactive spec. | ||
| 4 | |||
| 1 | 2011-11-20 Stefan Monnier <monnier@iro.umontreal.ca> | 5 | 2011-11-20 Stefan Monnier <monnier@iro.umontreal.ca> |
| 2 | 6 | ||
| 3 | * electric.el (electric-indent-mode): Fix last change (too optimistic). | 7 | * electric.el (electric-indent-mode): Fix last change (too optimistic). |
diff --git a/lisp/window.el b/lisp/window.el index 477211672cf..2885c3a5c70 100644 --- a/lisp/window.el +++ b/lisp/window.el | |||
| @@ -2920,6 +2920,7 @@ window. | |||
| 2920 | 2920 | ||
| 2921 | This function removes the buffer denoted by BUFFER-OR-NAME from | 2921 | This function removes the buffer denoted by BUFFER-OR-NAME from |
| 2922 | all window-local buffer lists." | 2922 | all window-local buffer lists." |
| 2923 | (interactive "bBuffer to replace: ") | ||
| 2923 | (let ((buffer (window-normalize-buffer buffer-or-name))) | 2924 | (let ((buffer (window-normalize-buffer buffer-or-name))) |
| 2924 | (dolist (window (window-list-1 nil nil t)) | 2925 | (dolist (window (window-list-1 nil nil t)) |
| 2925 | (if (eq (window-buffer window) buffer) | 2926 | (if (eq (window-buffer window) buffer) |