master a33e7c0286c 2/2: Disable workDoneProgress if defcustom is nil

[Theodor Thornhill]

branch: master
commit a33e7c0286c2a9c8af1c96db42f5c0c37611c9db
Author: Theodor Thornhill <theo@thornhill.no>
Commit: Theodor Thornhill <theo@thornhill.no>

    Disable workDoneProgress if defcustom is nil
    
    There is no need to receive the $/progress notifications from the server
    if we don't want to render them. Because they are effectively ignored
    when eglot-report-progress is nil we'd rather not waste cycles on serde
    of the messages.
    
    * lisp/progmodes/eglot.el (eglot-client-capabilities): use value from
    defcustom to decide whether or not to advertise to server.
---
 lisp/progmodes/eglot.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/progmodes/eglot.el b/lisp/progmodes/eglot.el
index 515c33f8cde..f247c43203c 100644
--- a/lisp/progmodes/eglot.el
+++ b/lisp/progmodes/eglot.el
@@ -1004,7 +1004,7 @@ ACTION is an LSP object of either `CodeAction' or 
`Command' type."
                                          [,@(mapcar
                                              #'car eglot--tag-faces)])))
             :window `(:showDocument (:support t)
-                      :workDoneProgress t)
+                      :workDoneProgress ,(if eglot-report-progress t 
:json-false))
             :general (list :positionEncodings ["utf-32" "utf-8" "utf-16"])
             :experimental eglot--{})))