gnu: Add rust-cargo-credential-0.4.

* gnu/packages/crates-vcs.scm (rust-cargo-credential-0.4): New variable.
(rust-cargo-credential-0.3): Inherit from rust-cargo-credential-0.4.

Change-Id: Ia305d6407863bfe3f7c7d281ff15186c00bac781

gnu/packages/crates-io.scm

@@ -10008,8 +10008,36 @@ the library crate of Cargo.")
     (description "Load and resolve Cargo configuration.")
     (license (list license:asl2.0 license:expat))))
 
+(define-public rust-cargo-credential-0.4
+  (package
+    (name "rust-cargo-credential")
+    (version "0.4.1")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "cargo-credential" version))
+       (file-name (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32 "0myp2fic79yaclb5lik9rv4kg12sly1k0zba4gbx2wljyqmkxdhy"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(#:cargo-inputs (("rust-anyhow" ,rust-anyhow-1)
+                       ("rust-libc" ,rust-libc-0.2)
+                       ("rust-serde" ,rust-serde-1)
+                       ("rust-serde-json" ,rust-serde-json-1)
+                       ("rust-thiserror" ,rust-thiserror-1)
+                       ("rust-time" ,rust-time-0.3)
+                       ("rust-windows-sys" ,rust-windows-sys-0.48))
+       #:cargo-development-inputs (("rust-snapbox" ,rust-snapbox-0.4))))
+    (home-page "https://github.com/rust-lang/cargo")
+    (synopsis "Library to assist writing Cargo credential helpers")
+    (description
+     "This package provides a library to assist writing Cargo credential helpers.")
+    (license (list license:expat license:asl2.0))))
+
 (define-public rust-cargo-credential-0.3
   (package
+    (inherit rust-cargo-credential-0.4)
     (name "rust-cargo-credential")
     (version "0.3.0")
     (source
@@ -10019,7 +10047,6 @@ the library crate of Cargo.")
        (file-name (string-append name "-" version ".tar.gz"))
        (sha256
         (base32 "1da8gx0lv4bkr3g070533mvyl638bviv506v8791archyy3nqv32"))))
-    (build-system cargo-build-system)
     (arguments
      `(#:cargo-inputs
        (("rust-anyhow" ,rust-anyhow-1)
@@ -10030,12 +10057,7 @@ the library crate of Cargo.")
         ("rust-time" ,rust-time-0.3)
         ("rust-windows-sys" ,rust-windows-sys-0.48))
        #:cargo-development-inputs
-       (("rust-snapbox" ,rust-snapbox-0.4))))
+       (("rust-snapbox" ,rust-snapbox-0.4))))))
-    (home-page "https://github.com/rust-lang/cargo")
-    (synopsis "Library to assist writing Cargo credential helpers")
-    (description
-     "This package provides a library to assist writing Cargo credential helpers.")
-    (license (list license:expat license:asl2.0))))
 
 (define-public rust-cargo-credential-libsecret-0.3
   (package