Mercurial > emacs
comparison lisp/files.el @ 92746:26e567ab8830
(display-buffer-other-frame): Eliminate problematic code.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Tue, 11 Mar 2008 20:48:57 +0000 |
| parents | 4054054dd212 |
| children | eec1450e060e |
comparison
equal
deleted
inserted
replaced
| 92745:871ad7e118ff | 92746:26e567ab8830 |
|---|---|
| 1076 (let ((pop-up-frames t) | 1076 (let ((pop-up-frames t) |
| 1077 same-window-buffer-names same-window-regexps | 1077 same-window-buffer-names same-window-regexps |
| 1078 (old-window (selected-window)) | 1078 (old-window (selected-window)) |
| 1079 new-window) | 1079 new-window) |
| 1080 (setq new-window (display-buffer buffer t)) | 1080 (setq new-window (display-buffer buffer t)) |
| 1081 (lower-frame (window-frame new-window)) | 1081 ;; This may have been here in order to prevent the new frame from hiding |
| 1082 (make-frame-invisible (window-frame old-window)) | 1082 ;; the old frame. But it does more harm than good. |
| 1083 (make-frame-visible (window-frame old-window)))) | 1083 ;; Maybe we should call `raise-window' on the old-frame instead? --Stef |
| 1084 ;;(lower-frame (window-frame new-window)) | |
| 1085 | |
| 1086 ;; This may have been here in order to make sure the old-frame gets the | |
| 1087 ;; focus. But not only can it cause an annoying flicker, with some | |
| 1088 ;; window-managers it just makes the window invisible, with no easy | |
| 1089 ;; way to recover it. --Stef | |
| 1090 ;;(make-frame-invisible (window-frame old-window)) | |
| 1091 ;;(make-frame-visible (window-frame old-window)) | |
| 1092 )) | |
| 1084 | 1093 |
| 1085 (defvar find-file-default nil | 1094 (defvar find-file-default nil |
| 1086 "Used within `find-file-read-args'.") | 1095 "Used within `find-file-read-args'.") |
| 1087 | 1096 |
| 1088 (defmacro minibuffer-with-setup-hook (fun &rest body) | 1097 (defmacro minibuffer-with-setup-hook (fun &rest body) |