[elpa] externals/eglot e964abe 091/139: Get rid of eglot--buffer-open-count

[João Távora]

branch: externals/eglot
commit e964abeba3e1f164fa05e9f7aaa79c4419ee1fe7
Author: João Távora <address@hidden>
Commit: João Távora <address@hidden>

    Get rid of eglot--buffer-open-count
    
    Hasn't really proved useful yet.
    
    * eglot.el (eglot--buffer-open-count): Remove.
    (eglot--signal-textDocument/didOpen)
    (eglot--signal-textDocument/didClose): Simplify.
---
 eglot.el | 35 ++++++++---------------------------
 1 file changed, 8 insertions(+), 27 deletions(-)

diff --git a/eglot.el b/eglot.el
index 1318fee..a600f47 100644
--- a/eglot.el
+++ b/eglot.el
@@ -135,9 +135,6 @@ A list (WHAT SERIOUS-P)." t)
 Either a list of strings (a shell command and arguments), or a
 list of a single string of the form <host>:<port>")
 
-(eglot--define-process-var eglot--buffer-open-count (make-hash-table)
-  "Keeps track of didOpen/didClose notifs for each buffer.")
-
 (defun eglot--make-process (name managed-major-mode contact)
   "Make a process from CONTACT.
 NAME is a name to give the inferior process or connection.
@@ -1158,33 +1155,17 @@ Records START, END and PRE-CHANGE-LENGTH locally."
 
 (defun eglot--signal-textDocument/didOpen ()
   "Send textDocument/didOpen to server."
-  (let* ((proc (eglot--current-process-or-lose))
-         (count (1+ (or (gethash (current-buffer)
-                                 (eglot--buffer-open-count proc))
-                        0))))
-    (when (> count 1)
-      (eglot--error "Too many textDocument/didOpen notifs for %s" 
(current-buffer)))
-    (setf (gethash (current-buffer) (eglot--buffer-open-count proc))
-          count)
-    (eglot--notify proc
-                   :textDocument/didOpen
-                   (eglot--obj :textDocument
-                               (eglot--current-buffer-TextDocumentItem)))))
+  (eglot--notify (eglot--current-process-or-lose)
+                 :textDocument/didOpen
+                 (eglot--obj :textDocument
+                             (eglot--current-buffer-TextDocumentItem))))
 
 (defun eglot--signal-textDocument/didClose ()
   "Send textDocument/didClose to server."
-  (let* ((proc (eglot--current-process-or-lose))
-         (count (1- (or (gethash (current-buffer)
-                                 (eglot--buffer-open-count proc))
-                        0))))
-    (when (< count 0)
-      (eglot--error "Too many textDocument/didClose notifs for %s" 
(current-buffer)))
-    (setf (gethash (current-buffer) (eglot--buffer-open-count proc))
-          count)
-    (eglot--notify proc
-                   :textDocument/didClose
-                   (eglot--obj :textDocument
-                               
(eglot--current-buffer-TextDocumentIdentifier)))))
+  (eglot--notify (eglot--current-process-or-lose)
+                 :textDocument/didClose
+                 (eglot--obj :textDocument
+                             (eglot--current-buffer-TextDocumentIdentifier))))
 
 (defun eglot--signal-textDocument/willSave ()
   "Send textDocument/willSave to server."