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).
This commit is contained in:
Christopher Schmidt 2012-07-25 11:43:12 +02:00 committed by Martin Rudalics
parent 8137e7b316
commit f08088e354
2 changed files with 7 additions and 1 deletions

View file

@ -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)))
))))))