branch: externals/eglot
commit c43dff4d31b724c9ce2e9fba1f742384885abb9b
Author: João Távora <[email protected]>
Commit: João Távora <[email protected]>
On request timeout, clear it from the deferred actions
Noticed by Filipp Gunbin <[email protected]>
* 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
