From 20bc806b044057d657e8ba6d10b6515bd1b702d4 Mon Sep 17 00:00:00 2001
From: Marius Bakke <marius@gnu.org>
Date: Mon, 27 Jun 2022 19:32:53 +0200
Subject: [PATCH] gnu: icu4c: Update to 71.1.

* gnu/packages/icu4c.scm (icu4c): Update to 71.1.
(icu4c-71): Remove variable.
* gnu/packages/chromium.scm (ungoogled-chromium)[inputs]: Change ICU4C-71 to
ICU4C.
---
 gnu/packages/chromium.scm |  2 +-
 gnu/packages/icu4c.scm    | 20 ++------------------
 2 files changed, 3 insertions(+), 19 deletions(-)

diff --git a/gnu/packages/chromium.scm b/gnu/packages/chromium.scm
index e9e20ab7b9..0ee6210394 100644
--- a/gnu/packages/chromium.scm
+++ b/gnu/packages/chromium.scm
@@ -887,7 +887,7 @@
            glib
            gtk+
            harfbuzz-3.0
-           icu4c-71
+           icu4c
            jsoncpp
            lcms
            libevent
diff --git a/gnu/packages/icu4c.scm b/gnu/packages/icu4c.scm
index 1be214f67f..e0ace9acf3 100644
--- a/gnu/packages/icu4c.scm
+++ b/gnu/packages/icu4c.scm
@@ -41,7 +41,7 @@
 (define-public icu4c
   (package
    (name "icu4c")
-   (version "69.1")
+   (version "71.1")
    (source (origin
             (method url-fetch)
             (uri (string-append
@@ -51,7 +51,7 @@
                   (string-map (lambda (x) (if (char=? x #\.) #\_ x)) version)
                   "-src.tgz"))
             (sha256
-             (base32 "0icps0avkwy5df3wwc5kybxcg63hcgk4phdh9g244g0xrmx7pfjc"))))
+             (base32 "1gqywaqj9jmdwrng9lm6inyqmi5j2cz36db9dcqg3yk13zjyd9v7"))))
    (build-system gnu-build-system)
    ;; When cross-compiling, this package needs a source directory of a
    ;; native-build of itself.
@@ -106,22 +106,6 @@ C/C++ part.")
    (license x11)
    (home-page "http://site.icu-project.org/")))
 
-(define-public icu4c-71
-  (package
-    (inherit icu4c)
-    (version "71.1")
-    (source (origin
-              (method url-fetch)
-              (uri (string-append
-                    "https://github.com/unicode-org/icu/releases/download/release-"
-                    (string-map (lambda (x) (if (char=? x #\.) #\- x)) version)
-                    "/icu4c-"
-                    (string-map (lambda (x) (if (char=? x #\.) #\_ x)) version)
-                    "-src.tgz"))
-              (sha256
-               (base32
-                "1gqywaqj9jmdwrng9lm6inyqmi5j2cz36db9dcqg3yk13zjyd9v7"))))))
-
 (define-public icu4c-70
   (package
     (inherit icu4c)