Work around issue with (setq Man-notify-method 'aggressive)

* lisp/man.el (Man-bgproc-sentinel): Check that the window still
exists before trying to select it (bug#38164).
This commit is contained in:
Lars Ingebrigtsen 2021-04-04 21:35:56 +02:00
parent dd1aa7bc4c
commit c967f55a01

View file

@ -1503,7 +1503,9 @@ manpage command."
(quit-restore-window
(get-buffer-window Man-buffer t) 'kill)
;; Ensure that we end up in the correct window.
(select-window (old-selected-window)))
(let ((old-window (old-selected-window)))
(when (window-live-p old-window)
(select-window old-window))))
(kill-buffer Man-buffer)))
(when message