summaryrefslogtreecommitdiff
path: root/lisp/window.el
diff options
context:
space:
mode:
authorJuri Linkov <juri@linkov.net>2023-05-19 21:04:50 +0300
committerJuri Linkov <juri@linkov.net>2023-05-19 21:04:50 +0300
commit8e61d23f71e75225e1e48a572db76c2845a4201a (patch)
treef1ded942878cada787ef9c997046f7c3c032850a /lisp/window.el
parent459d08c7fe7f723b3cefe71fa50bbe4481f66995 (diff)
downloademacs-8e61d23f71e75225e1e48a572db76c2845a4201a.tar.gz
Split windows horizontally in places that use split to create a new window.
* lisp/tab-bar.el (tab-bar-new-tab-to): * lisp/window.el (window-state-put): To create a new window, split horizontally instead of vertically. Use 'window-safe-min-width' for the SIZE arg of 'split-window'. (bug#62592)
Diffstat (limited to 'lisp/window.el')
-rw-r--r--lisp/window.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/window.el b/lisp/window.el
index 016d53ffbdd..a11b1a51f8f 100644
--- a/lisp/window.el
+++ b/lisp/window.el
@@ -6382,7 +6382,7 @@ windows can get as small as `window-safe-min-height' and
(selected-window)))
(delete-other-windows-internal window root)
;; Create a new window to replace the existing one.
- (setq window (prog1 (split-window window)
+ (setq window (prog1 (split-window window window-safe-min-width t)
(delete-window window)))))
(set-window-dedicated-p window nil)