01/03: build: font-build-system: Install web fonts.

[guix-commits]

arunisaac pushed a commit to branch core-updates
in repository guix.

commit 0c272b6e7a8179fafd1dcedd6730dec55535a647
Author: Arun Isaac <arunisaac@systemreboot.net>
AuthorDate: Sun Mar 20 15:01:12 2022 +0530

    build: font-build-system: Install web fonts.
    
    * guix/build/font-build-system.scm (install): Install woff and woff2 web 
font
    files.
---
 guix/build/font-build-system.scm | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/guix/build/font-build-system.scm b/guix/build/font-build-system.scm
index 6726595fe1..9bd9524a7d 100644
--- a/guix/build/font-build-system.scm
+++ b/guix/build/font-build-system.scm
@@ -1,5 +1,5 @@
 ;;; GNU Guix --- Functional package management for GNU
-;;; Copyright © 2017 Arun Isaac <arunisaac@systemreboot.net>
+;;; Copyright © 2017, 2022 Arun Isaac <arunisaac@systemreboot.net>
 ;;; Copyright © 2017 Alex Griffin <a@ajgrf.com>
 ;;;
 ;;; This file is part of GNU Guix.
@@ -54,6 +54,8 @@ archive, or a font file."
               (find-files source "\\.(ttf|ttc)$"))
     (for-each (cut install-file <> (string-append fonts "/opentype"))
               (find-files source "\\.(otf|otc)$"))
+    (for-each (cut install-file <> (string-append fonts "/web"))
+              (find-files source "\\.(woff|woff2)$"))
     #t))
 
 (define %standard-phases