[bug#69257] [PATCH 055/228] gnu: Add rust-http-body-util-0.1.

[Herman Rimm]

* gnu/packages/crates-web.scm (rust-http-body-util-0.1): Add variable.

Change-Id: I6883dcc1b1ec475c557a0d62606ec30172d478d4
---
 gnu/packages/crates-web.scm | 26 ++++++++++++++++++++++++++
 1 file changed, 26 insertions(+)

diff --git a/gnu/packages/crates-web.scm b/gnu/packages/crates-web.scm
index b0b431ff88..6a68dfab0d 100644
--- a/gnu/packages/crates-web.scm
+++ b/gnu/packages/crates-web.scm
@@ -2356,6 +2356,32 @@ (define-public rust-http-body-0.1
         ("rust-http" ,rust-http-0.1)
         ("rust-tokio-buf" ,rust-tokio-buf-0.1))))))
 
+(define-public rust-http-body-util-0.1
+  (package
+    (name "rust-http-body-util")
+    (version "0.1.0")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "http-body-util" version))
+       (file-name (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32 "0h78a6jj2vky0wmgmq5f1h541cmhmlij09gw63fxl59h77mpkjs1"))))
+    (build-system cargo-build-system)
+    (arguments
+     `(#:cargo-inputs (("rust-bytes" ,rust-bytes-1)
+                       ("rust-futures-util" ,rust-futures-util-0.3)
+                       ("rust-http" ,rust-http-1)
+                       ("rust-http-body" ,rust-http-body-1)
+                       ("rust-pin-project-lite" ,rust-pin-project-lite-0.2))
+       #:cargo-development-inputs (("rust-tokio" ,rust-tokio-1))))
+    (home-page "https://github.com/hyperium/http-body";)
+    (synopsis "Combinators and adapters for HTTP request/response bodies")
+    (description
+     "This package provides combinators and adapters for HTTP request or
+response bodies.")
+    (license license:expat)))
+
 (define-public rust-http-client-6
   (package
     (name "rust-http-client")
-- 
2.41.0