Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-22 21:07:36 +00:00
Code Issues Projects Releases Packages Wiki Activity

In special-display-popup-frame reset new frame's previous buffers to nil.

Browse source 
* window.el (special-display-popup-frame): When popping up a new frame
reset its previous buffers to nil.  Simplify code.
This commit is contained in:
Martin Rudalics 2011-09-22 11:28:57 +02:00
parent bfeef8b6da
commit 7f80c86d3c
2 changed files with 12 additions and 8 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
lisp/ChangeLog
View file

@ -14,6 +14,8 @@
* window.el (quit-window): Undedicate window when switching to
previous buffer. Reported by Thierry Volpiatto
<thierry.volpiatto@gmail.com>.
(special-display-popup-frame): When popping up a new frame reset
its previous buffers to nil. Simplify code.
2011-09-21 Michael Albinus <michael.albinus@gmx.de>

18
lisp/window.el
View file

@ -4104,14 +4104,16 @@ and (cdr ARGS) as second."
special-display-buffer-names special-display-regexps)
(display-buffer buffer)))
;; If no window yet, make one in a new frame.
(let ((frame
(with-current-buffer buffer
(make-frame (append args special-display-frame-alist)))))
(display-buffer-record-window
'frame (frame-selected-window frame) buffer)
(set-window-buffer (frame-selected-window frame) buffer)
(set-window-dedicated-p (frame-selected-window frame) t)
(frame-selected-window frame))))))
(let* ((frame
(with-current-buffer buffer
(make-frame (append args special-display-frame-alist))))
(window (frame-selected-window frame)))
(display-buffer-record-window 'frame window buffer)
(set-window-buffer window buffer)
;; Reset list of WINDOW's previous buffers to nil.
(set-window-prev-buffers window nil)
(set-window-dedicated-p window t)
window)))))
(defcustom special-display-function 'special-display-popup-frame
"Function to call for displaying special buffers.