emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/eglot ce53ca4 44/54: Close #315: introduce and use eglo


From: João Távora
Subject: [elpa] externals/eglot ce53ca4 44/54: Close #315: introduce and use eglot--{}, the empty JSON object
Date: Thu, 16 Apr 2020 05:31:52 -0400 (EDT)

branch: externals/eglot
commit ce53ca463b5e0519d5813071813fdcd55c6ff214
Author: Vladimir Panteleev <address@hidden>
Commit: Felicián Németh <address@hidden>

    Close #315: introduce and use eglot--{}, the empty JSON object
    
    * eglot.el (Constants): Add eglot--{}.
    (eglot-shutdown, eglot--connect): Use it.
    
    Copyright-paperwork-exempt: yes
---
 eglot.el | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/eglot.el b/eglot.el
index 1bdca12..7f506c8 100644
--- a/eglot.el
+++ b/eglot.el
@@ -220,6 +220,8 @@ let the buffer grow forever."
     (13 . "Enum") (14 . "Keyword") (15 . "Snippet") (16 . "Color")
     (17 . "File") (18 . "Reference")))
 
+(defconst eglot--{} (make-hash-table) "The empty JSON object.")
+
 
 
 ;;; Message verification helpers
@@ -595,9 +597,9 @@ SERVER.  ."
   (unwind-protect
       (progn
         (setf (eglot--shutdown-requested server) t)
-        (jsonrpc-request server :shutdown (make-hash-table)
+        (jsonrpc-request server :shutdown eglot--{}
                          :timeout (or timeout 1.5))
-        (jsonrpc-notify server :exit (make-hash-table)))
+        (jsonrpc-notify server :exit eglot--{}))
     ;; Now ask jsonrpc.el to shut down the server.
     (jsonrpc-shutdown server (not preserve-buffers))
     (unless preserve-buffers (kill-buffer (jsonrpc-events-buffer server)))))
@@ -874,7 +876,7 @@ This docstring appeases checkdoc, that's all."
                                 (gethash project eglot--servers-by-project))
                           (setf (eglot--capabilities server) capabilities)
                           (setf (eglot--server-info server) serverInfo)
-                          (jsonrpc-notify server :initialized 
(make-hash-table))
+                          (jsonrpc-notify server :initialized eglot--{})
                           (dolist (buffer (buffer-list))
                             (with-current-buffer buffer
                               ;; No need to pass SERVER as an argument: it has



reply via email to

[Prev in Thread] Current Thread [Next in Thread]