diff options
| author | Richard M. Stallman | 2004-03-04 16:49:23 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 2004-03-04 16:49:23 +0000 |
| commit | cf44b9b79750d55a88e90a88eac4fcd135f5d753 (patch) | |
| tree | 4b4fde233a40edbdb9ccd49e274614a29ef01ab1 | |
| parent | 5a7139eec2c0a129a72f4715a655c791b5e810c1 (diff) | |
| download | emacs-cf44b9b79750d55a88e90a88eac4fcd135f5d753.tar.gz emacs-cf44b9b79750d55a88e90a88eac4fcd135f5d753.zip | |
(switch-to-buffer-other-window): Bind
same-window-buffer-names and same-window-regexps to nil.
(switch-to-buffer-other-frame): Likewise.
| -rw-r--r-- | lisp/files.el | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/lisp/files.el b/lisp/files.el index 3b178af029b..a63aea99114 100644 --- a/lisp/files.el +++ b/lisp/files.el | |||
| @@ -855,7 +855,9 @@ do not put this buffer at the front of the list of recently selected ones. | |||
| 855 | This uses the function `display-buffer' as a subroutine; see its | 855 | This uses the function `display-buffer' as a subroutine; see its |
| 856 | documentation for additional customization information." | 856 | documentation for additional customization information." |
| 857 | (interactive "BSwitch to buffer in other window: ") | 857 | (interactive "BSwitch to buffer in other window: ") |
| 858 | (let ((pop-up-windows t)) | 858 | (let ((pop-up-windows t) |
| 859 | ;; Don't let these interfere. | ||
| 860 | same-window-buffer-names same-window-regexps) | ||
| 859 | (pop-to-buffer buffer t norecord))) | 861 | (pop-to-buffer buffer t norecord))) |
| 860 | 862 | ||
| 861 | (defun switch-to-buffer-other-frame (buffer &optional norecord) | 863 | (defun switch-to-buffer-other-frame (buffer &optional norecord) |
| @@ -866,7 +868,8 @@ do not put this buffer at the front of the list of recently selected ones. | |||
| 866 | This uses the function `display-buffer' as a subroutine; see its | 868 | This uses the function `display-buffer' as a subroutine; see its |
| 867 | documentation for additional customization information." | 869 | documentation for additional customization information." |
| 868 | (interactive "BSwitch to buffer in other frame: ") | 870 | (interactive "BSwitch to buffer in other frame: ") |
| 869 | (let ((pop-up-frames t)) | 871 | (let ((pop-up-frames t) |
| 872 | same-window-buffer-names same-window-regexps) | ||
| 870 | (pop-to-buffer buffer t norecord) | 873 | (pop-to-buffer buffer t norecord) |
| 871 | (raise-frame (window-frame (selected-window))))) | 874 | (raise-frame (window-frame (selected-window))))) |
| 872 | 875 | ||