diff --git a/lisp/tab-bar.el b/lisp/tab-bar.el index 35474e1c674..08f904ec73d 100644 --- a/lisp/tab-bar.el +++ b/lisp/tab-bar.el @@ -1586,7 +1595,8 @@ tab-bar-new-tab-to (window-state-put (window-state-get)) ;; Create a new window to get rid of old window parameters ;; (e.g. prev/next buffers) of old window. - (split-window) (delete-window)))) + (let ((window-min-height 1)) (split-window)) + (delete-window)))) (let ((buffer (if (and (functionp tab-bar-new-tab-choice) diff --git a/lisp/window.el b/lisp/window.el index aa7520f30fa..b2ee869940a 100644 --- a/lisp/window.el +++ b/lisp/window.el @@ -6391,7 +6396,8 @@ window-state-put (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 (let ((window-min-height 1)) + (split-window window)) (delete-window window))))) (set-window-dedicated-p window nil)