diff options
author | Juri Linkov <juri@linkov.net> | 2018-12-21 01:57:34 +0200 |
---|---|---|
committer | Juri Linkov <juri@linkov.net> | 2018-12-21 01:57:34 +0200 |
commit | 47f4be68fb3d513154bd66315d9602352e775e2a (patch) | |
tree | 9e1acef18ad91755c5bb1af41d508442bf092b7c /lisp/emacs-lisp | |
parent | 157ada833f36b9919be44ad4ecbae6d94c808dec (diff) | |
download | emacs-47f4be68fb3d513154bd66315d9602352e775e2a.tar.gz emacs-47f4be68fb3d513154bd66315d9602352e775e2a.tar.bz2 emacs-47f4be68fb3d513154bd66315d9602352e775e2a.zip |
* 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)
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r-- | lisp/emacs-lisp/debug.el | 8 |
1 files 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 |