branch: externals/eglot
commit c43dff4d31b724c9ce2e9fba1f742384885abb9b
Author: João Távora <joaotav...@gmail.com>
Commit: João Távora <joaotav...@gmail.com>

    On request timeout, clear it from the deferred actions
    
    Noticed by Filipp Gunbin <fgun...@fastmail.fm>
    
    * jsonrpc.el (jsonrpc--async-request-1): Clear deferred action in
      timeout handler.
---
 jsonrpc.el | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/jsonrpc.el b/jsonrpc.el
index 1bd71c1..c032687 100644
--- a/jsonrpc.el
+++ b/jsonrpc.el
@@ -601,6 +601,8 @@ TIMEOUT is nil)."
                      timeout nil
                      (lambda ()
                        (remhash id (jsonrpc--request-continuations connection))
+                       (remhash (list deferred buf)
+                                (jsonrpc--deferred-actions connection))
                        (if timeout-fn (funcall timeout-fn)
                          (jsonrpc--debug
                           connection `(:timed-out ,method :id ,id

Reply via email to