[PATCH] Add WenQuanYi ZenHei font.

[PATCH] Add WenQuanYi ZenHei font.

[Ricardo Wurmus]

[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #1: 0001-gnu-Add-WenQuanYi-ZenHei-font.patch --]
[-- Type: text/x-patch, Size: 2846 bytes --]

From caa906f41e25202ecc4546cb04a8b0b6c70e556a Mon Sep 17 00:00:00 2001
From: Ricardo Wurmus <rekado@elephly.net>
Date: Wed, 11 Mar 2015 08:55:57 +0100
Subject: [PATCH] gnu: Add WenQuanYi ZenHei font.

* gnu/packages/fonts.scm (font-wqy-zenhei): New variable.
---
 gnu/packages/fonts.scm | 47 +++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 47 insertions(+)

diff --git a/gnu/packages/fonts.scm b/gnu/packages/fonts.scm
index 77abc2b..40b1722 100644
--- a/gnu/packages/fonts.scm
+++ b/gnu/packages/fonts.scm
@@ -359,3 +359,50 @@ fonts are intended to support the characters necessary to render or display
 text in Simplified Chinese, Traditional Chinese, Japanese, and Korean.
 ")
     (license license:asl2.0)))
+
+(define-public font-wqy-zenhei
+  (package
+    (name "font-wqy-zenhei")
+    (version "0.9.45")
+    (source (origin
+              (method url-fetch)
+              (uri (string-append
+                    "mirror://sourceforge/wqy/wqy-zenhei-"
+                    version ".tar.gz"))
+              (file-name (string-append "wqy-zenhei-" version ".tar.gz"))
+              (sha256
+               (base32
+                "1mkmxq8g2hjcglb3zajfqj20r4r88l78ymsp2xyl5yav8w3f7dz4"))))
+    (build-system trivial-build-system)
+    (arguments
+     `(#:modules ((guix build utils))
+       #:builder
+       (begin
+         (use-modules (guix build utils))
+         (let ((PATH (string-append (assoc-ref %build-inputs "tar")  "/bin:"
+                                    (assoc-ref %build-inputs "gzip") "/bin"))
+               (font-dir (string-append (assoc-ref %outputs "out")
+                                        "/share/fonts/wenquanyi/")))
+           (setenv "PATH" PATH)
+           (mkdir-p font-dir)
+           (system* "tar" "xvf" (assoc-ref %build-inputs "source"))
+           (chdir "wqy-zenhei")
+           (copy-file "wqy-zenhei.ttc"
+                      (string-append font-dir "wqy-zenhei.ttc"))))))
+    (native-inputs
+     `(("gzip" ,gzip)
+       ("tar" ,tar)))
+    (home-page "http://wenq.org/wqy2/")
+    (synopsis "CJK font")
+    (description
+     "WenQuanYi Zen Hei is a Hei-Ti style (sans-serif type) Chinese outline
+font.  It is designed for general purpose text formatting and on-screen
+display of Chinese characters and symbols from many other languages.
+WenQuanYi Zen Hei provides a rather complete coverage to Chinese Hanzi glyphs,
+including both simplified and traditional forms.  The total glyph number in
+this font is over 35,000, including over 21,000 Chinese Hanzi.  This font has
+full coverage to GBK(CP936) charset, CJK Unified Ideographs, as well as the
+code-points needed for zh_cn, zh_sg, zh_tw, zh_hk, zh_mo, ja (Japanese) and
+ko (Korean) locales for fontconfig.")
+    ;; GPLv2 with font embedding exception
+    (license license:gpl2)))
-- 
2.1.0

Re: [PATCH] Add WenQuanYi ZenHei font.

[Ludovic Courtès]

Ricardo Wurmus <rekado@elephly.net> skribis:

> From caa906f41e25202ecc4546cb04a8b0b6c70e556a Mon Sep 17 00:00:00 2001
> From: Ricardo Wurmus <rekado@elephly.net>
> Date: Wed, 11 Mar 2015 08:55:57 +0100
> Subject: [PATCH] gnu: Add WenQuanYi ZenHei font.
>
> * gnu/packages/fonts.scm (font-wqy-zenhei): New variable.

LGTM.

> +           (copy-file "wqy-zenhei.ttc"
> +                      (string-append font-dir "wqy-zenhei.ttc"))))))

What format is this?

Thanks,
Ludo’.

Re: [PATCH] Add WenQuanYi ZenHei font.

[Ricardo Wurmus]

Ludovic Courtès writes:

>> +           (copy-file "wqy-zenhei.ttc"
>> +                      (string-append font-dir "wqy-zenhei.ttc"))))))
>
> What format is this?

Apparently it's a TrueType font collection containing three fonts.

~~ Ricardo

Re: [PATCH] Add WenQuanYi ZenHei font.

[Ludovic Courtès]

Ricardo Wurmus <rekado@elephly.net> skribis:

> Ludovic Courtès writes:
>
>>> +           (copy-file "wqy-zenhei.ttc"
>>> +                      (string-append font-dir "wqy-zenhei.ttc"))))))
>>
>> What format is this?
>
> Apparently it's a TrueType font collection containing three fonts.

OK, didn’t know that extension.

Thanks,
Ludo’.