gnu: guile-scheme-json-rpc: Update to 0.4.0.

* gnu/packages/guile-xyz.scm (guile-scheme-json-rpc): Update to 0.4.0.
[inputs]: Add guile-srfi-145, guile-srfi-180, remove guile-json-3.

Co-authored-by: Andrew Tropin <andrew@trop.in>
Signed-off-by: Andrew Tropin <andrew@trop.in>

gnu/packages/guile-xyz.scm

@@ -1054,36 +1054,33 @@ It has a nice, simple s-expression based syntax.")
     (inputs (list guile-2.2))))
 
 (define-public guile-scheme-json-rpc
-  (let ((commit "45ae6890f6619286f5679f88c094c88127b54c4a")
+  (package
-        (revision "0")
+    (name "guile-scheme-json-rpc")
-        (version "0.2.11"))
+    (version "0.4.0")
-    (package
+    (source (origin
-      (name "guile-scheme-json-rpc")
+              (method git-fetch)
-      (version (git-version version revision commit))
+              (uri (git-reference
-      (source (origin
+                    (url "https://codeberg.org/rgherdt/scheme-json-rpc.git")
-                (method git-fetch)
+                    (commit version)))
-                (uri (git-reference
+              (file-name (git-file-name name version))
-                      (url "https://codeberg.org/rgherdt/scheme-json-rpc.git")
+              (sha256
-                      (commit commit)))
+               (base32
-                (file-name (git-file-name name version))
+                "0jsampz2ahs18z6yh9b5l3lkj8ycnavs0vg9sjngdj3w3zvrdcvm"))))
-                (sha256
+    (build-system gnu-build-system)
-                 (base32
+    (arguments
-                  "0w4m8xx8yyj0rv0q57mjr8ja87l7yikscj33i3ck26wg7230ppa5"))))
+     `(#:phases (modify-phases %standard-phases
-      (build-system gnu-build-system)
+                  (add-after 'unpack 'change-to-guile-dir
-      (arguments
+                    (lambda _
-       `(#:phases (modify-phases %standard-phases
+                      (chdir "guile"))))))
-                    (add-after 'unpack 'change-to-guile-dir
+    (inputs (list guile-3.0 guile-srfi-145 guile-srfi-180))
-                      (lambda _
+    (native-inputs (list pkg-config))
-                        (chdir "guile"))))))
+    (synopsis "Library providing JSON-RPC capability for Guile Scheme")
-      (inputs (list guile-3.0 guile-json-3))
+    (description
-      (native-inputs (list pkg-config))
+     "This library implements parts of the
-      (synopsis "Library providing JSON-RPC capability in Scheme")
-      (description
-       "This library implements parts of the
 @uref{https://www.jsonrpc.org/specification,JSON-RPC specification}, allowing
 for calling methods on remote servers by exchanging JSON objects.")
-      (home-page "https://codeberg.org/rgherdt/scheme-json-rpc/")
+    (home-page "https://codeberg.org/rgherdt/scheme-json-rpc/")
-      (license license:expat))))
+    (license license:expat)))
 
 (define-public guile-squee
   (let ((commit "9f2609563fc53466e46d37c8d8d2fbcfce67b2ba")