Subject: bug#27182: [PATCH] gnu: font-cns11643-swjz: Use 'font-build-system'.

From: Brendan Tildesley <[email-masked]>
Date: Thu, 1 Jun 2017 23:21:54 +1000

>From 7f9935fc6c7630419ecd6b290613e1b368fca87d Mon Sep 17 00:00:00 2001
From: Brendan Tildesley <[email-masked]>
Date: Thu, 1 Jun 2017 22:00:25 +1000
Subject: [PATCH] gnu: font-cns11643-swjz: Use 'font-build-system'.

* gnu/packages/fonts.scm (font-cns11643-swjz): Use 'font-build-system'.
---
 gnu/packages/fonts.scm | 14 +-------------
 1 file changed, 1 insertion(+), 13 deletions(-)

diff --git a/gnu/packages/fonts.scm b/gnu/packages/fonts.scm
index 620c5dec7..1145b3114 100644
--- a/gnu/packages/fonts.scm
+++ b/gnu/packages/fonts.scm
@@ -471,19 +471,7 @@ encoded in the user defined area of the Big-5 code.
        (sha256
         (base32
          "1qkljldbmb53zp1rcmpsb8rzy67rnsqcjxi549m9743ifk4isl78"))))
-    (build-system trivial-build-system)
-    (arguments
-     `(#:modules ((guix build utils))
-       #:builder
-       (begin
-         (use-modules (guix build utils))
-         (let ((font-dir (string-append %output
-                                        "/share/fonts/truetype/cns11643"))
-               (source (assoc-ref %build-inputs "source")))
-           (mkdir-p font-dir)
-           (copy-file source
-                      (string-append font-dir "/" "ebas927.ttf"))
-           #t))))
+    (build-system font-build-system)
     (home-page
      (string-append "http://www.cns11643.gov.tw/AIDB/download.do"
                     "?name=%E5%AD%97%E5%9E%8B%E4%B8%8B%E8%BC%89"))
-- 
2.13.0