guix-patches
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[bug#27719] gnu: font-wqy-microhei: Use 'font-build-system'.


From: Feng Shu
Subject: [bug#27719] gnu: font-wqy-microhei: Use 'font-build-system'.
Date: Sun, 16 Jul 2017 06:01:07 +0800
User-agent: Gnus/5.13 (Gnus v5.13) Emacs/25.2 (gnu/linux)

>From 006d7a9f10d521e2de82b22eb25c5b87dad42e17 Mon Sep 17 00:00:00 2001
From: Feng Shu <address@hidden>
Date: Sun, 16 Jul 2017 05:57:02 +0800
Subject: [PATCH] gnu: font-wqy-microhei: Use 'font-build-system'.

* gnu/packages/fonts.scm (font-wqy-microhei): Switch to font-build-system.
---
 gnu/packages/fonts.scm | 18 +-----------------
 1 file changed, 1 insertion(+), 17 deletions(-)

diff --git a/gnu/packages/fonts.scm b/gnu/packages/fonts.scm
index d89719d97..7687ed235 100644
--- a/gnu/packages/fonts.scm
+++ b/gnu/packages/fonts.scm
@@ -499,23 +499,7 @@ ko (Korean) locales for @code{fontconfig}.")
               (sha256
                (base32
                 "0gi1yxqph8xx869ichpzzxvx6y50wda5hi77lrpacdma4f0aq0i8"))))
-    (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")))
-           (mkdir-p font-dir)
-           (setenv "PATH" PATH)
-           (system* "tar" "xvf" (assoc-ref %build-inputs "source"))
-           (install-file "wqy-microhei/wqy-microhei.ttc" font-dir)))))
-    (native-inputs
-     `(("gzip" ,gzip)
-       ("tar" ,tar)))
+    (build-system font-build-system)
     (home-page "http://wenq.org/wqy2/";)
     (synopsis "CJK font")
     (description
-- 
2.13.2


-- 

reply via email to

[Prev in Thread] Current Thread [Next in Thread]