diff options
| author | Stefan Kangas | 2022-01-13 01:01:48 +0100 |
|---|---|---|
| committer | Stefan Kangas | 2022-01-13 01:02:22 +0100 |
| commit | 9599b5923b2bc56fbf5e1fccee6a19643c75c984 (patch) | |
| tree | d3188c219745914a21ce616bc51a21765c45c492 | |
| parent | 097e0ee4a20f09d7d1262ddb56ca1a0e5ed1e156 (diff) | |
| download | emacs-9599b5923b2bc56fbf5e1fccee6a19643c75c984.tar.gz emacs-9599b5923b2bc56fbf5e1fccee6a19643c75c984.zip | |
* lisp/jsonrpc.el (jsonrpc--debug): Use apply on format args list.
| -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." |