emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master a58dc58fec8: Fix bug when splitting a frame's root window (Bug#73


From: Martin Rudalics
Subject: master a58dc58fec8: Fix bug when splitting a frame's root window (Bug#73627)
Date: Sun, 13 Oct 2024 03:49:16 -0400 (EDT)

branch: master
commit a58dc58fec8dc146cf10454c6a2b3174d1b4c2f8
Author: Martin Rudalics <rudalics@gmx.at>
Commit: Martin Rudalics <rudalics@gmx.at>

    Fix bug when splitting a frame's root window (Bug#73627)
    
    * lisp/window.el (split-window): Split main window of WINDOW's
    frame when that frame has side windows (Bug#73627).
---
 lisp/window.el | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/lisp/window.el b/lisp/window.el
index 1b95b5c9500..b50770cbd7e 100644
--- a/lisp/window.el
+++ b/lisp/window.el
@@ -5599,6 +5599,13 @@ frame.  The selected window is not changed by this 
function."
             (setq atom-root (window-atom-root window))
             (not (eq atom-root window)))
        (throw 'done (split-window atom-root size side pixelwise)))
+       ;; If WINDOW's frame has a side window and WINDOW specifies the
+       ;; frame's root window, split the frame's main window instead
+       ;; (Bug#73627).
+       ((and (eq window (frame-root-window frame))
+            (window-with-parameter 'window-side nil frame))
+       (throw 'done (split-window (window-main-window frame)
+                                  size side pixelwise)))
        ;; If WINDOW is a side window or its first or last child is a
        ;; side window, throw an error unless `window-combination-resize'
        ;; equals 'side.



reply via email to

[Prev in Thread] Current Thread [Next in Thread]