* lisp/jsonrpc.el (jsonrpc--debug): Use apply on format args list.

diff --git a/lisp/jsonrpc.el b/lisp/jsonrpc.el
index 84d0ef9179b8607f6dec917acb988b300ff363cf..ee88a28b37e0a6ccecb3310343b0f5b7a9e47eb2 100644 (file)
--- a/lisp/jsonrpc.el
+++ b/lisp/jsonrpc.el
@@ -698,7 +698,9 @@ TIMEOUT is nil)."
 (defun jsonrpc--debug (server format &rest args)
   "Debug message for SERVER with FORMAT and ARGS."
   (jsonrpc--log-event
-   server (if (stringp format)`(:message ,(format format args)) format)))
+   server (if (stringp format)
+              `(:message ,(apply #'format format args))
+            format)))
 
 (defun jsonrpc--warn (format &rest args)
   "Warning message with FORMAT and ARGS."