From 8c5ad448436077e5e0a3aaa3789fade43b72ec6d Mon Sep 17 00:00:00 2001
From: Brendan Tildesley <brendan.tildesley@openmailbox.org>
Date: Thu, 1 Jun 2017 22:59:45 +1000
Subject: [PATCH] gnu: font-cns11643: Use 'font-build-system'.
* gnu/packages/fonts.scm (font-cns16643): Switch to 'font-build-system'.
[outputs]: Combine all outputs into one.
Signed-off-by: Arun Isaac <arunisaac@systemreboot.net>
---
gnu/packages/fonts.scm | 30 +-----------------------------
1 file changed, 1 insertion(+), 29 deletions(-)
diff --git a/gnu/packages/fonts.scm b/gnu/packages/fonts.scm
index c84cc9234fe..24107273ef6 100644
--- a/gnu/packages/fonts.scm
+++ b/gnu/packages/fonts.scm
@@ -410,35 +410,7 @@ (define-public font-cns11643
(sha256
(base32
"1iad6rklxkx03ji1fav9faq7cmqkci3i6pcyg2ilvh984j5qzhq3"))))
- (outputs '("out" "tw-kai" "tw-sung"))
- (build-system trivial-build-system)
- (native-inputs
- `(("unzip" ,unzip)))
- (arguments
- `(#:modules ((guix build utils))
- #:builder
- (begin
- (use-modules (guix build utils))
- (let* ((font-dir "/share/fonts/truetype/cns11643")
- (out (string-append
- (assoc-ref %outputs "out") font-dir))
- (tw-kai (string-append
- (assoc-ref %outputs "tw-kai") font-dir))
- (tw-sung (string-append
- (assoc-ref %outputs "tw-sung") font-dir))
- (unzip (string-append
- (assoc-ref %build-inputs "unzip") "/bin/unzip")))
- (system* unzip (assoc-ref %build-inputs "source"))
- (chdir "Open_Data/Fonts/")
- (install-file "TW-Kai-98_1.ttf" tw-kai)
- (install-file "TW-Sung-98_1.ttf" tw-sung)
- (install-file "TW-Kai-98_1.ttf" out)
- (install-file "TW-Kai-Ext-B-98_1.ttf" out)
- (install-file "TW-Kai-Plus-98_1.ttf" out)
- (install-file "TW-Sung-98_1.ttf" out)
- (install-file "TW-Sung-Ext-B-98_1.ttf" out)
- (install-file "TW-Sung-Plus-98_1.ttf" out)
- #t))))
+ (build-system font-build-system)
(home-page "http://www.cns11643.gov.tw/AIDB/welcome.do")
(synopsis "CJK TrueType fonts, TW-Kai and TW-Sung")
(description
--
GitLab