Mercurial > emacs
changeset 98195:b137280b6fc9
(switch-to-buffer-other-frame): Don't raise frame since
pop-to-buffer already does it.
(display-buffer-other-frame): Fix doc-string.
| author | Martin Rudalics <rudalics@gmx.at> |
|---|---|
| date | Tue, 16 Sep 2008 08:27:32 +0000 |
| parents | 6cf707f7e962 |
| children | 0e384cdef05f |
| files | lisp/files.el |
| diffstat | 1 files changed, 8 insertions(+), 10 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/files.el Tue Sep 16 08:20:21 2008 +0000 +++ b/lisp/files.el Tue Sep 16 08:27:32 2008 +0000 @@ -1074,24 +1074,22 @@ (defun switch-to-buffer-other-frame (buffer &optional norecord) "Switch to buffer BUFFER in another frame. -Optional second arg NORECORD non-nil means -do not put this buffer at the front of the list of recently selected ones. +Optional second arg NORECORD non-nil means do not put this +buffer at the front of the list of recently selected ones. This function returns the buffer it switched to. -This uses the function `display-buffer' as a subroutine; see its -documentation for additional customization information." +This uses the function `display-buffer' as a subroutine; see +its documentation for additional customization information." (interactive (list (read-buffer-to-switch "Switch to buffer in other frame: "))) (let ((pop-up-frames t) same-window-buffer-names same-window-regexps) - (prog1 - (pop-to-buffer buffer t norecord) - (raise-frame (window-frame (selected-window)))))) + (pop-to-buffer buffer t norecord))) (defun display-buffer-other-frame (buffer) - "Switch to buffer BUFFER in another frame. -This uses the function `display-buffer' as a subroutine; see its -documentation for additional customization information." + "Display buffer BUFFER in another frame. +This uses the function `display-buffer' as a subroutine; see +its documentation for additional customization information." (interactive "BDisplay buffer in other frame: ") (let ((pop-up-frames t) same-window-buffer-names same-window-regexps