From: Martin Rudalics <rudalics@gmx.at>
Date: Wed, 29 Sep 2021 08:43:29 +0000 (+0200)
Subject: Fix 'window-toggle-side-windows' (Bug#50867)
X-Git-Tag: emacs-28.0.90~530
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=dcabf95275dfa8681ba3a5e732906de98951436a;p=emacs.git

Fix 'window-toggle-side-windows' (Bug#50867)

* lisp/window.el (window-toggle-side-windows): Bind
'window-combination-resize' to t around 'window-state-put'
calls (Bug#50867).
---

diff --git a/lisp/window.el b/lisp/window.el
index b240b16f247..971264b6344 100644
--- a/lisp/window.el
+++ b/lisp/window.el
@@ -1212,7 +1212,8 @@ it is found."
      ((setq state (frame-parameter frame 'window-state))
       ;; A window state was saved for FRAME.  Restore it and put the
       ;; current root window into its main window.
-      (let ((main-state (window-state-get (frame-root-window frame))))
+      (let ((window-combination-resize t)
+            (main-state (window-state-get (frame-root-window frame))))
         (window-state-put state (frame-root-window frame) t)
         (window-state-put main-state (window-main-window frame)))
       (window--sides-reverse-frame frame))