diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/jsonrpc.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/jsonrpc.el b/lisp/jsonrpc.el index 84d0ef9179b..ee88a28b37e 100644 --- a/lisp/jsonrpc.el +++ b/lisp/jsonrpc.el | |||
| @@ -698,7 +698,9 @@ TIMEOUT is nil)." | |||
| 698 | (defun jsonrpc--debug (server format &rest args) | 698 | (defun jsonrpc--debug (server format &rest args) |
| 699 | "Debug message for SERVER with FORMAT and ARGS." | 699 | "Debug message for SERVER with FORMAT and ARGS." |
| 700 | (jsonrpc--log-event | 700 | (jsonrpc--log-event |
| 701 | server (if (stringp format)`(:message ,(format format args)) format))) | 701 | server (if (stringp format) |
| 702 | `(:message ,(apply #'format format args)) | ||
| 703 | format))) | ||
| 702 | 704 | ||
| 703 | (defun jsonrpc--warn (format &rest args) | 705 | (defun jsonrpc--warn (format &rest args) |
| 704 | "Warning message with FORMAT and ARGS." | 706 | "Warning message with FORMAT and ARGS." |