From 47f4be68fb3d513154bd66315d9602352e775e2a Mon Sep 17 00:00:00 2001 From: Juri Linkov Date: Fri, 21 Dec 2018 01:57:34 +0200 Subject: [PATCH] * lisp/emacs-lisp/debug.el (debug): Add display-buffer-below-selected to display actions of pop-to-buffer, and `(window-min-height . 10)' to display alist. (Bug#32825) --- lisp/emacs-lisp/debug.el | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) diff --git a/lisp/emacs-lisp/debug.el b/lisp/emacs-lisp/debug.el index 34a2a1336d6..b6b1f20675f 100644 --- a/lisp/emacs-lisp/debug.el +++ b/lisp/emacs-lisp/debug.el @@ -239,11 +239,13 @@ first will be printed into the backtrace buffer." (pop-to-buffer debugger-buffer `((display-buffer-reuse-window - display-buffer-in-previous-window) - . (,(when (and (window-live-p debugger-previous-window) + display-buffer-in-previous-window + display-buffer-below-selected) + . ((window-min-height . 10) + ,@(when (and (window-live-p debugger-previous-window) (frame-visible-p (window-frame debugger-previous-window))) - `(previous-window . ,debugger-previous-window))))) + `((previous-window . ,debugger-previous-window)))))) (setq debugger-window (selected-window)) (if (eq debugger-previous-window debugger-window) (when debugger-jumping-flag -- 2.39.5