Subject: bug#26703: [PATCH 2/2] gnu: Add font-cns11643-swjz

From: Brendan Tildesley <[email-masked]>
Date: Tue, 2 May 2017 00:58:50 +1000

Marius Bakke 於 2017-05-01 01:33 寫道:
> Brendan Tildesley <[email-masked]> writes:
>
>> * gnu/packages/fonts.scm (font-cns11643-swjz): New variable.
> Thanks!
>
> [...]
>
>> +    (license (license:non-copyleft
>> +              "http://www.cns11643.gov.tw/AIDB/copyright.do"))))
> I ran this text through a translation service and it does not mention
> anything about attribution, redistribution etc. Is there such a text
> available somewhere?

I could not find much info on this font on Google or Baidu,
surprisingly. I emailed the Digital Minister of Taiwan and she linked me
to that URL saying it was a permissive license.

My Chinese is poor, but, I believe the first sentence states that one
can *c**opy, modify, make use of* the fonts distributed on the site,
excluding patent and trademark matters. The rest of the document just
lays out disclaimers. I don't know if it says anything else about
attribution, apart from the bit excluding trademark.

"本網站以無償及非專屬授權方式授權使用者得不限時間及地域，*重製、編輯、公開傳輸或為其他利用方式*，開發各種產品或服務（以下簡稱加值產品），但授權範圍不包含商標權及專利權"

I have attached an updated patch that is generated after the updated
[PATCH 1/2]

>From 67e3c348e6840a47d6f05aa4df751d39c176c247 Mon Sep 17 00:00:00 2001
From: Brendan Tildesley <[email-masked]>
Date: Tue, 2 May 2017 00:39:06 +1000
Subject: [PATCH 2/2] gnu: Add font-cns11643-swjz

* gnu/packages/fonts.scm (font-cns11643-swjz): New variable.
---
 gnu/packages/fonts.scm | 35 +++++++++++++++++++++++++++++++++++
 1 file changed, 35 insertions(+)

diff --git a/gnu/packages/fonts.scm b/gnu/packages/fonts.scm
index 83ac27c6c..3b68add7c 100644
--- a/gnu/packages/fonts.scm
+++ b/gnu/packages/fonts.scm
@@ -579,6 +579,41 @@ encoded in the user defined area of the Big-5 code.
     (license (license:non-copyleft
               "http://data.gov.tw/license")))) ; CC-BY 4.0 compatible
 
+(define-public font-cns11643-swjz
+  (package
+    (name "font-cns11643-swjz")
+    (version "1")
+    (source
+     (origin
+       (method url-fetch)
+       (uri "https://www.moedict.tw/fonts/truetype/cns11643/ebas927.ttf")
+       (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"))))))
+    (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"))
+    (synopsis "TrueType seal script font")
+    (description
+     "@code{Shuowen Jiezi} is a TrueType seal script font based on the ancient
+text of the same name published by the Executive Yuan of Taiwan. 6721 glyphs
+are included, at Unicode compatible code points corresponding to their modern
+variants.")
+    (license (license:non-copyleft
+              "http://www.cns11643.gov.tw/AIDB/copyright.do"))))
+
 (define-public font-wqy-zenhei
   (package
     (name "font-wqy-zenhei")
-- 
2.12.2