gnu: Add font-cns11643.
* gnu/packages/fonts.scm (font-cns11643): New variable. Signed-off-by: Marius Bakke <mbakke@fastmail.com>
This commit is contained in:
parent
99aa2dce5d
commit
840b713613
|
@ -18,6 +18,7 @@
|
|||
;;; Copyright © 2017 José Miguel Sánchez García <jmi2k@openmailbox.com>
|
||||
;;; Copyright © 2017 Alex Griffin <a@ajgrf.com>
|
||||
;;; Copyright © 2017 Clément Lassieur <clement@lassieur.org>
|
||||
;;; Copyright © 2017 Brendan Tildesley <brendan.tildesley@openmailbox.org>
|
||||
;;;
|
||||
;;; This file is part of GNU Guix.
|
||||
;;;
|
||||
|
@ -522,6 +523,66 @@ fonts are intended to support the characters necessary to render or display
|
|||
text in Simplified Chinese, Traditional Chinese, Japanese, and Korean.")
|
||||
(license license:silofl1.1)))
|
||||
|
||||
(define-public font-cns11643
|
||||
(package
|
||||
(name "font-cns11643")
|
||||
(version "98.1.20170405")
|
||||
(source (origin
|
||||
(method url-fetch)
|
||||
(uri "http://www.cns11643.gov.tw/AIDB/Open_Data.zip")
|
||||
(sha256
|
||||
(base32
|
||||
"02kb3bwjrra0k2hlr2p8xswd2y0xs6j8d9vm6yrby734h02a40qf"))))
|
||||
(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))))
|
||||
(home-page "http://www.cns11643.gov.tw/AIDB/welcome.do")
|
||||
(synopsis "CJK TrueType fonts, TW-Kai and TW-Sung")
|
||||
(description
|
||||
"@code{CNS 11643} character set (Chinese National Standard, or Chinese
|
||||
Standard Interchange Code) is the standard character set of the Republic of
|
||||
China (Taiwan) for Chinese Characters and other Unicode symbols. Contained
|
||||
are six TrueType fonts based on two script styles, Regular script (Kai), and
|
||||
Sung/Ming script, each with three variants:
|
||||
|
||||
@itemize
|
||||
@item @code{CNS 11643} (@code{TW-Kai} and @code{TW-Sung}): Tens of thousands
|
||||
of CJK characters from frequency tables published by the Taiwanese
|
||||
Ministry of Education. ISO 10646 and Unicode compatible encoding.
|
||||
@item @code{Big-5 Plus}: Several thousand frequently used CJK characters
|
||||
encoded in the user defined area of the Big-5 code.
|
||||
@item @code{Big-5 Extended}: A Big-5 character set based on the
|
||||
@code{Big-5 Plus} and @code{CNS 11643} character sets.
|
||||
@end itemize\n")
|
||||
(license (license:non-copyleft
|
||||
"http://data.gov.tw/license")))) ; CC-BY 4.0 compatible
|
||||
|
||||
(define-public font-wqy-zenhei
|
||||
(package
|
||||
(name "font-wqy-zenhei")
|
||||
|
|
Loading…
Reference in New Issue