From: Fredrik Bergroth <fbergroth@gmail.com>
Date: Wed, 15 Dec 2021 12:05:22 +0000 (+0100)
Subject: Support autoimporttext from pyright language server
X-Git-Tag: emacs-29.0.90~1616^2~524^2~4^2~98
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=34c7da506d85d7bb160e60957163eef941804364;p=emacs.git

Support autoimporttext from pyright language server

* eglot.el (eglot-completion-at-point): show autoImportText via company-docsig.

GitHub-reference: fix https://github.com/joaotavora/eglot/issues/769
---

diff --git a/lisp/progmodes/eglot.el b/lisp/progmodes/eglot.el
index 85220f2cd52..80eb58f5791 100644
--- a/lisp/progmodes/eglot.el
+++ b/lisp/progmodes/eglot.el
@@ -2416,6 +2416,13 @@ is not active."
                      (kind (alist-get (plist-get lsp-item :kind)
                                       eglot--kind-names)))
            (intern (downcase kind))))
+       :company-docsig
+       ;; FIXME: autoImportText is specific to the pyright language server
+       (lambda (proxy)
+         (when-let* ((lsp-comp (get-text-property 0 'eglot--lsp-item proxy))
+                     (data (plist-get (funcall resolve-maybe lsp-comp) :data))
+                     (import-text (plist-get data :autoImportText)))
+           import-text))
        :company-doc-buffer
        (lambda (proxy)
          (let* ((documentation