From: João Távora <joaotavora@gmail.com>
Date: Sat, 29 Jul 2023 10:15:14 +0000 (+0100)
Subject: Jsonrpc: fix error code in jsonrpc-error function (bug#64888)
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=2af83f215ce83eda5a3eba21c352e6cd7435fbb1;p=emacs.git

Jsonrpc: fix error code in jsonrpc-error function (bug#64888)

* lisp/jsonrpc.el (jsonrpc-error): Fix error code.
---

diff --git a/lisp/jsonrpc.el b/lisp/jsonrpc.el
index c8b287a7e94..e0315b32915 100644
--- a/lisp/jsonrpc.el
+++ b/lisp/jsonrpc.el
@@ -223,7 +223,7 @@ object, using the keywords `:code', `:message' and `:data'."
              (apply #'format-message (car args) (cdr args))))
         (signal 'jsonrpc-error
                 `(,msg
-                  (jsonrpc-error-code . ,32603)
+                  (jsonrpc-error-code . ,-32603)
                   (jsonrpc-error-message . ,msg))))
     (cl-destructuring-bind (&key code message data) args
       (signal 'jsonrpc-error