Support markdown for textDocument/hover (#329)

* eglot.el (eglot-client-capabilities): annouce markdown support for hover. (eglot--format-markup): Format hover info with Markdown. Fixes: #328 Copyright-paperwork-exempt: yes (#329: joaotavora/eglot#329 #328: joaotavora/eglot#328
bhankas · Oct 28, 2019 · 0951926 · 0951926
1 parent dd77133
commit 0951926
Showing 1 changed file with 5 additions and 2 deletions.
diff --git a/lisp/progmodes/eglot.el b/lisp/progmodes/eglot.el
@@ -489,7 +489,8 @@ treated as in `eglot-dbind'."
                                            t
                                          :json-false))
                                     :contextSupport t)
-             :hover              `(:dynamicRegistration :json-false)
+             :hover              (list :dynamicRegistration :json-false
+                                       :contentFormat ["markdown" "plaintext"])
              :signatureHelp      (list :dynamicRegistration :json-false
                                        :signatureInformation
                                        `(:parameterInformation
@@ -1080,7 +1081,9 @@ Doubles as an indicator of snippet support."
                (if (stringp markup) (list (string-trim markup)
                                           (intern "gfm-view-mode"))
                  (list (plist-get markup :value)
-                       major-mode))))
+                       (pcase (plist-get markup :kind)
+                         ("markdown" 'gfm-view-mode)
+                         (_ major-mode))))))
     (with-temp-buffer
       (insert string)
       (ignore-errors (delay-mode-hooks (funcall mode)))