mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-17 17:58:46 +00:00
Code Issues Releases Activity

(display-buffer-other-frame): Eliminate problematic code.

Browse Source
This commit is contained in:
Stefan Monnier 2008-03-11 20:48:57 +00:00
parent ed10603b35
commit 38a79e3315
2 changed files with 14 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lisp/ChangeLog
View File

@ -1,5 +1,7 @@
2008-03-11 Stefan Monnier <monnier@iro.umontreal.ca>
* files.el (display-buffer-other-frame): Eliminate problematic code.
* menu-bar.el (menu-bar-update-buffers-maxbuf): Remove.
(menu-bar-select-buffer): Remove.
(menu-bar-select-frame): Make non-interactive and take a frame arg.

15
lisp/files.el
View File

@ -1078,9 +1078,18 @@ documentation for additional customization information."
(old-window (selected-window))
new-window)
(setq new-window (display-buffer buffer t))
(lower-frame (window-frame new-window))
(make-frame-invisible (window-frame old-window))
(make-frame-visible (window-frame old-window))))
;; This may have been here in order to prevent the new frame from hiding
;; the old frame. But it does more harm than good.
;; Maybe we should call `raise-window' on the old-frame instead? --Stef
;;(lower-frame (window-frame new-window))
;; This may have been here in order to make sure the old-frame gets the
;; focus. But not only can it cause an annoying flicker, with some
;; window-managers it just makes the window invisible, with no easy
;; way to recover it. --Stef
;;(make-frame-invisible (window-frame old-window))
;;(make-frame-visible (window-frame old-window))
))
(defvar find-file-default nil
"Used within `find-file-read-args'.")