[elpa] externals/eglot dade5a1487: Fix #768: Don't error out on unsupported Diagnostic.codeDescription

[ELPA Syncer]

branch: externals/eglot
commit dade5a148712463a15b7ac65f779e25596a3eefc
Author: Brian Leung <leungbk@posteo.net>
Commit: Stefan Kangas <stefankangas@gmail.com>

    Fix #768: Don't error out on unsupported Diagnostic.codeDescription
    
    A codeDescription property is, at the time of writing, an object with
    an href property (of type URI, or a string), denoting a "URI to open
    with more information about the diagnostic error".
    
    It's not obvious how best to put this into a Flymake diagostic
    aside from simply appending it to the diagnostic message, so we'll
    worry about it some other time.
    
    * eglot.el (eglot--lsp-interface-alist)
    (eglot-client-capabilities): Don't error out on unsupported
    Diagnostic.codeDescription.
---
 eglot.el | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/eglot.el b/eglot.el
index 80eb58f579..bdd0dcccc5 100644
--- a/eglot.el
+++ b/eglot.el
@@ -351,7 +351,7 @@ This can be useful when using docker to run a language 
server.")
                              :sortText :filterText :insertText 
:insertTextFormat
                              :textEdit :additionalTextEdits :commitCharacters
                              :command :data))
-      (Diagnostic (:range :message) (:severity :code :source 
:relatedInformation))
+      (Diagnostic (:range :message) (:severity :code :source 
:relatedInformation :codeDescription))
       (DocumentHighlight (:range) (:kind))
       (FileSystemWatcher (:globPattern) (:kind))
       (Hover (:contents) (:range))
@@ -689,7 +689,11 @@ treated as in `eglot-dbind'."
              :formatting         `(:dynamicRegistration :json-false)
              :rangeFormatting    `(:dynamicRegistration :json-false)
              :rename             `(:dynamicRegistration :json-false)
-             :publishDiagnostics `(:relatedInformation :json-false))
+             :publishDiagnostics (list :relatedInformation :json-false
+                                       ;; TODO: We can support 
:codeDescription after
+                                       ;; adding an appropriate UI to
+                                       ;; Flymake.
+                                       :codeDescriptionSupport :json-false))
             :experimental eglot--{})))
 
 (defclass eglot-lsp-server (jsonrpc-process-connection)