From 8e4db752095664122ea1385ad64abd1dc7546fe2 Mon Sep 17 00:00:00 2001
From: =?utf8?q?Jo=C3=A3o=20T=C3=A1vora?= <joaotavora@gmail.com>
Date: Fri, 4 May 2018 14:42:02 +0100
Subject: [PATCH] Be quite explicit about our lack of capabilities right now

* eglot.el (eglot--client-capabilities): Spread out.
---
 lisp/progmodes/eglot.el | 35 +++++++++++++++++++++++++++++++++--
 1 file changed, 33 insertions(+), 2 deletions(-)

diff --git a/lisp/progmodes/eglot.el b/lisp/progmodes/eglot.el
index 8e39591a70d..57014222940 100644
--- a/lisp/progmodes/eglot.el
+++ b/lisp/progmodes/eglot.el
@@ -192,9 +192,40 @@ CONTACT is as `eglot--contact'.  Returns a process object."
 (defun eglot--client-capabilities ()
   "What the EGLOT LSP client supports."
   (eglot--obj
-   :workspace (eglot--obj)
+   :workspace    (eglot--obj
+                  :applyEdit nil
+                  :workspaceEdit nil
+                  :didChangeConfiguration nil
+                  :didChangeWatchedFiles nil
+                  :symbol nil
+                  :executeCommand nil
+                  :workspaceFolders nil
+                  :configuration nil)
    :textDocument (eglot--obj
-                  :publishDiagnostics `(:relatedInformation nil))))
+                  :synchronization (eglot--obj
+                                    :dynamicRegistration :json-false
+                                    :willSave t
+                                    :willSaveWaitUntil :json-false
+                                    :didSave t)
+                  :completion nil
+                  :hover nil
+                  :signatureHelp nil
+                  :references nil
+                  :documentHighlight nil
+                  :documentSymbol nil
+                  :formatting nil
+                  :rangeFormatting nil
+                  :onTypeFormatting nil
+                  :definition nil
+                  :typeDefinition nil
+                  :implementation nil
+                  :codeAction nil
+                  :codeLens nil
+                  :documentLink nil
+                  :colorProvider nil
+                  :rename nil
+                  :publishDiagnostics `(:relatedInformation :json-false))
+   :experimental (eglot--obj)))
 
 (defun eglot--connect (project managed-major-mode
                                short-name contact &optional success-fn)
-- 
2.39.2