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

diff --git a/lisp/man.el b/lisp/man.el
index abb9bbad8fd9df62e9cf153f9976b8c46cd5f40a..9b941a2b3d2d89690ef675afade879165fe41223 100644 (file)
--- a/lisp/man.el
+++ b/lisp/man.el
@@ -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