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

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

[Brendan Tildesley]

[-- Attachment #1: Type: text/plain, Size: 1 bytes --]



[-- Attachment #2: 0001-gnu-font-cns11643-swjz-Use-font-build-system.patch --]
[-- Type: text/x-patch, Size: 1440 bytes --]

From 7f9935fc6c7630419ecd6b290613e1b368fca87d Mon Sep 17 00:00:00 2001
From: Brendan Tildesley <brendan.tildesley@openmailbox.org>
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

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

[Arun Isaac]

Pushed! Thanks!