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

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

[elpa] externals/eglot 5874af9 32/69: Fix deferred actions (forgot the c


From: João Távora
Subject: [elpa] externals/eglot 5874af9 32/69: Fix deferred actions (forgot the crucial non-local exit)
Date: Fri, 22 Jun 2018 11:54:59 -0400 (EDT)

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

    Fix deferred actions (forgot the crucial non-local exit)
    
    Noticed by Filipp Gunbin <address@hidden>
    
    * jsonrpc.el (jsonrpc--async-request-1): Forgot the non-local
    exit.
---
 jsonrpc.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/jsonrpc.el b/jsonrpc.el
index 2bcff2e..1bd71c1 100644
--- a/jsonrpc.el
+++ b/jsonrpc.el
@@ -621,8 +621,9 @@ TIMEOUT is nil)."
                                              (apply #'jsonrpc-async-request
                                                     connection
                                                     method params args)))))
-                       (or timer (funcall make-timer)) id)
-                 (jsonrpc--deferred-actions connection))))
+                       (or timer (setq timer (funcall make-timer))) id)
+                 (jsonrpc--deferred-actions connection))
+        (cl-return-from jsonrpc--async-request-1 (list nil timer))))
     ;; Really send it
     ;;
     (jsonrpc-connection-send connection (jsonrpc-obj :jsonrpc "2.0"



reply via email to

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