mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-23 07:19:15 +00:00
Code Issues Releases Activity

(quit-window): Fixed FRAME to be the frame and never window.

Browse Source
This commit is contained in:
Richard M. Stallman 1998-05-07 04:05:28 +00:00
parent 6c0316aea2
commit c81845b60c
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lisp/window.el
View File

@ -303,7 +303,7 @@ If WINDOW is non-nil, it specifies a window; we delete that window,
and the buffer that is killed or buried is the one in that window."
(interactive "P")
(let ((buffer (window-buffer window))
(frame (if window (window-frame window) (selected-window)))
(frame (window-frame (or window (selected-window))))
(window-solitary
(save-selected-window
(if window