From f08088e354f5933e0df618c80ccbf2635bb45bef Mon Sep 17 00:00:00 2001 From: Christopher Schmidt Date: Wed, 25 Jul 2012 11:43:12 +0200 Subject: In pp-display-expression select old selected window only if it is still live (Bug#12034). * emacs-lisp/pp.el (pp-display-expression): Select old selected window only if it is still live (Bug#12034). --- lisp/emacs-lisp/pp.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'lisp/emacs-lisp/pp.el') diff --git a/lisp/emacs-lisp/pp.el b/lisp/emacs-lisp/pp.el index 48e0d6d6a2..30c16b51b9 100644 --- a/lisp/emacs-lisp/pp.el +++ b/lisp/emacs-lisp/pp.el @@ -110,7 +110,8 @@ after OUT-BUFFER-NAME." (progn (select-window window) (run-hooks 'temp-buffer-show-hook)) - (select-window old-selected) + (when (window-live-p old-selected) + (select-window old-selected)) (message "See buffer %s." out-buffer-name))) (message "%s" (buffer-substring (point-min) (point))) )))))) -- cgit v1.2.3