guix-commits
[Top][All Lists]
Advanced

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

02/02: gnu: font-iosevka: Use 'font-build-system'.


From: Danny Milosavljevic
Subject: 02/02: gnu: font-iosevka: Use 'font-build-system'.
Date: Wed, 31 May 2017 17:26:31 -0400 (EDT)

dannym pushed a commit to branch master
in repository guix.

commit 4a9140b1ee452c95682bb9e4e1b030f24f0c631d
Author: Alex Griffin <address@hidden>
Date:   Wed May 31 12:39:53 2017 -0500

    gnu: font-iosevka: Use 'font-build-system'.
    
    Fixes <https://bugs.gnu.org/27172>.
    
    * gnu/packages/fonts.scm (font-iosevka): Switch to font-build-system.
    [source]: Use url-fetch/zipbomb.
    [native-inputs]: Remove dependency on unzip.
    
    Signed-off-by: Danny Milosavljevic <address@hidden>
---
 gnu/packages/fonts.scm | 16 ++--------------
 1 file changed, 2 insertions(+), 14 deletions(-)

diff --git a/gnu/packages/fonts.scm b/gnu/packages/fonts.scm
index ef0642f..6dc098a 100644
--- a/gnu/packages/fonts.scm
+++ b/gnu/packages/fonts.scm
@@ -1205,26 +1205,14 @@ typeface, by mimicking Comic Sans while fixing its most 
obvious shortcomings.")
     (name "font-iosevka")
     (version "1.12.5")
     (source (origin
-              (method url-fetch)
+              (method url-fetch/zipbomb)
               (uri (string-append
                     "https://github.com/be5invis/Iosevka/releases/download/v";
                     version "/iosevka-pack-" version ".zip"))
               (sha256
                (base32
                 "0s3g6mk0ngwsrw9h9dqinb50cd9i8zhqdcmmh93fhyf4d87yfwyi"))))
-    (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"))
-                         (source (assoc-ref %build-inputs "source"))
-                         (unzip  (string-append (assoc-ref %build-inputs 
"unzip")
-                                                "/bin/unzip")))
-                     (mkdir-p font-dir)
-                     (system* unzip "-d" font-dir source)))))
-    (native-inputs `(("unzip" ,unzip)))
+    (build-system font-build-system)
     (home-page "https://be5invis.github.io/Iosevka/";)
     (synopsis "Coders' typeface, built from code")
     (description



reply via email to

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