Merge branch 'main' of ssh://git.zander.im/Zander671/emacs-config

init.el

@@ -681,6 +681,18 @@ to `posframe-show' if the display is graphical."
                    (when (not (get-buffer-window my/-eglot-documentation-buffer nil))
                      (switch-to-buffer-other-window my/-eglot-documentation-buffer t)
                      (switch-to-buffer-other-window buff t)))))))))
+  (defun my/-eglot-cleanup-doc-buffer (_server &optional _interactive _timeout
+                                               preserve-buffers)
+    (when (and (not preserve-buffers)
+               (buffer-live-p my/-eglot-documentation-buffer)
+               (cl-every (lambda (buffer)
+                           (with-current-buffer buffer
+                             (let ((server (eglot-current-server)))
+                               (or (not (eglot-lsp-server-p server))
+                                   (eglot--shutdown-requested server)))))
+                         (buffer-list)))
+      (kill-buffer my/-eglot-documentation-buffer)))
+  (advice-add 'eglot-shutdown :after 'my/-eglot-cleanup-doc-buffer)
   (defun my/-eglot-setup ()
     "Setup eldoc variables for `eglot-managed-mode-hook'."
     (setq-local evil-lookup-func #'my/eglot-documentation-at-point)