From 2af83f215ce83eda5a3eba21c352e6cd7435fbb1 Mon Sep 17 00:00:00 2001
From: =?utf8?q?Jo=C3=A3o=20T=C3=A1vora?= <joaotavora@gmail.com>
Date: Sat, 29 Jul 2023 11:15:14 +0100
Subject: [PATCH] Jsonrpc: fix error code in jsonrpc-error function (bug#64888)

* lisp/jsonrpc.el (jsonrpc-error): Fix error code.
---
 lisp/jsonrpc.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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
-- 
2.39.2