05/06: gnu: fntsample: Update Blocks.txt and use stable URL.

[guix-commits]

nckx pushed a commit to branch master
in repository guix.

commit 3e73beaf233f7533b9cafc3d162048560f48a72f
Author: Tobias Geerinckx-Rice <me@tobias.gr>
AuthorDate: Thu Oct 21 19:37:07 2021 +0200

    gnu: fntsample: Update Blocks.txt and use stable URL.
    
    * gnu/packages/fontutils.scm (fntsample)[input]: Update unicode-blocks
    to 14.0.0 and include the version in its URL and name.
---
 gnu/packages/fontutils.scm | 16 +++++++++-------
 1 file changed, 9 insertions(+), 7 deletions(-)

diff --git a/gnu/packages/fontutils.scm b/gnu/packages/fontutils.scm
index d173a15..c962777 100644
--- a/gnu/packages/fontutils.scm
+++ b/gnu/packages/fontutils.scm
@@ -935,13 +935,15 @@ work well with other GTK+ desktop environments.")
        ("perl-pdf-api2" ,perl-pdf-api2)
        ("perl-libintl-perl" ,perl-libintl-perl)
        ("unicode-blocks"
-        ,(origin
-           (method url-fetch)
-           (uri "https://unicode.org/Public/UNIDATA/Blocks.txt";)
-           (file-name "unicode-blocks.txt")
-           (sha256
-            (base32
-             "1xs8fnhh48gs41wg004r7m4r2azh9khmyjjlnvyzy9c6zrd212x2"))))))
+        ,(let ((version "14.0.0"))
+           (origin
+             (method url-fetch)
+             (uri (string-append "https://unicode.org/Public/";
+                                 version "/ucd/Blocks.txt"))
+             (file-name (string-append "unicode-blocks-" version ".txt"))
+             (sha256
+              (base32
+               "05vzgrvfp35mgxjgkm4wnxjjgzva8n6545i9jxd4pczpvvfp122r")))))))
     (home-page "https://github.com/eugmes/fntsample";)
     (synopsis "PDF and PostScript font samples generator")
     (description "This package provides a tool that can be used to make font