From be8a7155b48198b08bbc4844b2ce60c127405fb7 Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Mon, 25 Dec 2023 14:59:26 +0200 Subject: [PATCH] Fix 'split-root-window-right' and 'split-root-window-below' * lisp/window.el (split-root-window-right) (split-root-window-below): Fix the 'interactive' spec to avoid misbehaving when invoked with no prefix argument. (Bug#67452) --- lisp/window.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/lisp/window.el b/lisp/window.el index 35de790d85e..2c001d4112f 100644 --- a/lisp/window.el +++ b/lisp/window.el @@ -5723,7 +5723,8 @@ The current window configuration is retained in the top window, the lower window takes up the whole width of the frame. SIZE is handled as in `split-window-below', and interactively is the prefix numeric argument." - (interactive "p") + (interactive `(,(when current-prefix-arg + (prefix-numeric-value current-prefix-arg)))) (split-window-below size (frame-root-window))) (defun split-window-right (&optional size window-to-split) @@ -5763,7 +5764,8 @@ The current window configuration is retained within the left window, and a new window is created on the right, taking up the whole height of the frame. SIZE is treated as by `split-window-right' and interactively, is the prefix numeric argument." - (interactive "p") + (interactive `(,(when current-prefix-arg + (prefix-numeric-value current-prefix-arg)))) (split-window-right size (frame-root-window))) ;;; Balancing windows. -- 2.39.2