From: Martin Rudalics Date: Sun, 22 Mar 2015 11:40:21 +0000 (+0100) Subject: In `debug' don't try using window on inaccessible frame (Bug#17170). X-Git-Tag: emacs-24.5-rc1~15 X-Git-Url: https://code.delx.au/gnu-emacs/commitdiff_plain/bb7b23c5cbd0659a9e913ea4c4642bffe83541ef In `debug' don't try using window on inaccessible frame (Bug#17170). * emacs-lisp/debug.el (debug): Don't try using "previous" window when its not live or on an invisible frame (Bug#17170). --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index b28517f07e..8f888e37b0 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2015-03-22 Martin Rudalics + + * emacs-lisp/debug.el (debug): Don't try using "previous" window + when its not live or on an invisible frame (Bug#17170). + 2015-03-21 Mario Lang * emacs-lisp/tabulated-list.el (tabulated-list-print): Only call diff --git a/lisp/emacs-lisp/debug.el b/lisp/emacs-lisp/debug.el index dc0e666836..38befeece4 100644 --- a/lisp/emacs-lisp/debug.el +++ b/lisp/emacs-lisp/debug.el @@ -193,8 +193,10 @@ first will be printed into the backtrace buffer." debugger-buffer `((display-buffer-reuse-window display-buffer-in-previous-window) - . (,(when debugger-previous-window - `(previous-window . ,debugger-previous-window))))) + . (,(when (and (window-live-p debugger-previous-window) + (frame-visible-p + (window-frame debugger-previous-window))) + `(previous-window . ,debugger-previous-window))))) (setq debugger-window (selected-window)) (if (eq debugger-previous-window debugger-window) (when debugger-jumping-flag