[Emacs-diffs] Changes to emacs/lisp/window.el,v

[Martin Rudalics]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Martin Rudalics <m061211>       08/11/17 09:58:22

Index: window.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/window.el,v
retrieving revision 1.166
retrieving revision 1.167
diff -u -b -r1.166 -r1.167
--- window.el   17 Nov 2008 04:53:59 -0000      1.166
+++ window.el   17 Nov 2008 09:58:22 -0000      1.167
@@ -1437,7 +1437,8 @@
            (window-dedicated-p window))
        ;; WINDOW is either non-nil, a minibuffer window, or dedicated;
        ;; try to delete it.
-       (let ((frame (window-frame (or window (selected-window)))))
+       (let* ((window (or window (selected-window)))
+              (frame (window-frame window)))
          (if (eq window (frame-root-window frame))
              ;; WINDOW is alone on its frame.  `delete-windows-on'
              ;; knows how to handle that case.