From 046175cd4eae314f6e5d3d614efdeb573e8199df Mon Sep 17 00:00:00 2001
From: Alex Griffin <a@ajgrf.com>
Date: Wed, 31 May 2017 13:01:42 -0500
Subject: [PATCH] build: font: Support font collection files.

* guix/build/font-build-system.scm (install): Support TrueType
Collection (TTC) and OpenType Collection (OTC) files.

Signed-off-by: Danny Milosavljevic <dannym@scratchpost.org>
---
 guix/build/font-build-system.scm | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/guix/build/font-build-system.scm b/guix/build/font-build-system.scm
index cca1e93f0f9..f2a646f6f42 100644
--- a/guix/build/font-build-system.scm
+++ b/guix/build/font-build-system.scm
@@ -1,5 +1,6 @@
 ;;; GNU Guix --- Functional package management for GNU
 ;;; Copyright © 2017 Arun Isaac <arunisaac@systemreboot.net>
+;;; Copyright © 2017 Alex Griffin <a@ajgrf.com>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -50,9 +51,9 @@ (define* (install #:key outputs #:allow-other-keys)
          (source (getcwd))
          (fonts (string-append out "/share/fonts")))
     (for-each (cut install-file <> (string-append fonts "/truetype"))
-              (find-files source "\\.ttf$"))
+              (find-files source "\\.(ttf|ttc)$"))
     (for-each (cut install-file <> (string-append fonts "/opentype"))
-              (find-files source "\\.otf$"))
+              (find-files source "\\.(otf|otc)$"))
     #t))
 
 (define %standard-phases
-- 
GitLab