diff options
| author | Juri Linkov | 2018-12-21 01:57:34 +0200 |
|---|---|---|
| committer | Juri Linkov | 2018-12-21 01:57:34 +0200 |
| commit | 47f4be68fb3d513154bd66315d9602352e775e2a (patch) | |
| tree | 9e1acef18ad91755c5bb1af41d508442bf092b7c | |
| parent | 157ada833f36b9919be44ad4ecbae6d94c808dec (diff) | |
| download | emacs-47f4be68fb3d513154bd66315d9602352e775e2a.tar.gz 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)
| -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." | |||
| 239 | (pop-to-buffer | 239 | (pop-to-buffer |
| 240 | debugger-buffer | 240 | debugger-buffer |
| 241 | `((display-buffer-reuse-window | 241 | `((display-buffer-reuse-window |
| 242 | display-buffer-in-previous-window) | 242 | display-buffer-in-previous-window |
| 243 | . (,(when (and (window-live-p debugger-previous-window) | 243 | display-buffer-below-selected) |
| 244 | . ((window-min-height . 10) | ||
| 245 | ,@(when (and (window-live-p debugger-previous-window) | ||
| 244 | (frame-visible-p | 246 | (frame-visible-p |
| 245 | (window-frame debugger-previous-window))) | 247 | (window-frame debugger-previous-window))) |
| 246 | `(previous-window . ,debugger-previous-window))))) | 248 | `((previous-window . ,debugger-previous-window)))))) |
| 247 | (setq debugger-window (selected-window)) | 249 | (setq debugger-window (selected-window)) |
| 248 | (if (eq debugger-previous-window debugger-window) | 250 | (if (eq debugger-previous-window debugger-window) |
| 249 | (when debugger-jumping-flag | 251 | (when debugger-jumping-flag |