From 6ed8cbaf2b2be7e85f56f5c549b8ebd7dc29feeb Mon Sep 17 00:00:00 2001
From: Efraim Flashner <efraim@flashner.co.il>
Date: Mon, 22 May 2023 16:37:32 +0300
Subject: [PATCH] gnu: Add rust-anstyle-1.

* gnu/packages/crates-io.scm (rust-anstyle-1): New variable.
(rust-anstyle-0.2): Inherit from rust-anstyle-1.
---
 gnu/packages/crates-io.scm | 28 ++++++++++++++++++++++------
 1 file changed, 22 insertions(+), 6 deletions(-)

diff --git a/gnu/packages/crates-io.scm b/gnu/packages/crates-io.scm
index 127f1b7c22..c41b3d94e6 100644
--- a/gnu/packages/crates-io.scm
+++ b/gnu/packages/crates-io.scm
@@ -3062,8 +3062,29 @@ (define-public rust-ansi-parser-0.6
 escape codes.")
     (license license:mpl2.0)))
 
+(define-public rust-anstyle-1
+  (package
+    (name "rust-anstyle")
+    (version "1.0.0")
+    (source (origin
+              (method url-fetch)
+              (uri (crate-uri "anstyle" version))
+              (file-name (string-append name "-" version ".tar.gz"))
+              (sha256
+               (base32
+                "0zbazbfqs4mfw93573f61iy8c78vbbv824m3w206bbljpy39mva1"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(#:cargo-development-inputs
+       (("rust-lexopt" ,rust-lexopt-0.3))))
+    (home-page "https://github.com/rust-cli/anstyle")
+    (synopsis "ANSI text styling")
+    (description "This package provides ANSI text styling.")
+    (license (list license:expat license:asl2.0))))
+
 (define-public rust-anstyle-0.2
   (package
+    (inherit rust-anstyle-1)
     (name "rust-anstyle")
     (version "0.2.8")
     (source (origin
@@ -3073,14 +3094,9 @@ (define-public rust-anstyle-0.2
               (sha256
                (base32
                 "10kdjcyks9hcvmhk44afagnrxi4pczg6jnldjdadzbi4kyi2wqah"))))
-    (build-system cargo-build-system)
     (arguments
      `(#:cargo-development-inputs
-       (("rust-lexopt" ,rust-lexopt-0.3))))
-    (home-page "https://github.com/rust-cli/anstyle")
-    (synopsis "ANSI text styling")
-    (description "This package provides ANSI text styling.")
-    (license (list license:expat license:asl2.0))))
+       (("rust-lexopt" ,rust-lexopt-0.3))))))
 
 (define-public rust-anstyle-parse-0.2
   (package