master 4adc67c59de: Jsonrpc: fix destructuring bug

[João Távora]

branch: master
commit 4adc67c59dedcea89116aae0e054ea1212dcca7a
Author: João Távora <joaotavora@gmail.com>
Commit: João Távora <joaotavora@gmail.com>

    Jsonrpc: fix destructuring bug
    
    * lisp/jsonrpc.el (jsonrpc--process-sentinel): Fix destructuring bug.
    (Version): Bump to 1.0.22
---
 lisp/jsonrpc.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/lisp/jsonrpc.el b/lisp/jsonrpc.el
index 737351e5d7a..8b34728fb95 100644
--- a/lisp/jsonrpc.el
+++ b/lisp/jsonrpc.el
@@ -4,7 +4,7 @@
 
 ;; Author: João Távora <joaotavora@gmail.com>
 ;; Keywords: processes, languages, extensions
-;; Version: 1.0.21
+;; Version: 1.0.22
 ;; Package-Requires: ((emacs "25.2"))
 
 ;; This is a GNU ELPA :core package.  Avoid functionality that is not
@@ -585,7 +585,7 @@ With optional CLEANUP, kill any associated buffers."
         (let ((inhibit-read-only t))
           (insert "\n----------b---y---e---b---y---e----------\n")))
       ;; Cancel outstanding timers
-      (mapc (lambda (_id _success _error timer)
+      (mapc (jsonrpc-lambda (_id _success _error timer)
               (when timer (cancel-timer timer)))
             (jsonrpc--request-continuations connection))
       (maphash (lambda (_ triplet)
@@ -595,7 +595,7 @@ With optional CLEANUP, kill any associated buffers."
       (process-put proc 'jsonrpc-sentinel-cleanup-started t)
       (unwind-protect
           ;; Call all outstanding error handlers
-          (mapc (lambda (_id _success error _timer)
+          (mapc (jsonrpc-lambda (_id _success error _timer)
                   (funcall error '(:code -1 :message "Server died")))
                 (jsonrpc--request-continuations connection))
         (jsonrpc--message "Server exited with status %s" (process-exit-status 
proc))