From 001394351677736fafd9597a527bd900345fc7e7 Mon Sep 17 00:00:00 2001 From: Martin Rudalics Date: Mon, 25 Nov 2013 17:30:01 +0100 Subject: [PATCH] Have display-buffer-at-bottom always create new window on bottom (Bug#15961). * window.el (display-buffer-at-bottom): Make sure that split-window-sensibly creates the new window on bottom (Bug#15961). --- lisp/ChangeLog | 6 ++++++ lisp/window.el | 3 ++- 2 files changed, 8 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 7975d6eecbb..3955784c03b 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,9 @@ +2013-11-25 Martin Rudalics + + * window.el (display-buffer-at-bottom): Make sure that + split-window-sensibly creates the new window on bottom + (Bug#15961). + 2013-11-23 David Kastrup * vc/smerge-mode.el (smerge-ediff): Choose default buffer names based diff --git a/lisp/window.el b/lisp/window.el index ac9311b2dbf..f997d8b9027 100644 --- a/lisp/window.el +++ b/lisp/window.el @@ -5728,7 +5728,8 @@ of the selected frame." (walk-window-tree (lambda (window) (setq bottom-window window)) nil nil 'nomini) (or (and (not (frame-parameter nil 'unsplittable)) - (setq window (window--try-to-split-window bottom-window alist)) + (let (split-width-threshold) + (setq window (window--try-to-split-window bottom-window alist))) (window--display-buffer buffer window 'window alist display-buffer-mark-dedicated)) (and (not (frame-parameter nil 'unsplittable)) -- 2.39.2