From 05dbe19955883c914f9ec199ca4a26c31eff1074 Mon Sep 17 00:00:00 2001 From: Alex Griffin Date: Wed, 31 May 2017 12:22:35 -0500 Subject: [PATCH 2/2] gnu: font-iosevka: Use 'font-build-system'. * gnu/packages/fonts.scm (font-iosevka): Switch to font-build-system. [source]: Use url-fetch/zipbomb. [native-inputs]: Remove dependency on unzip. --- 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 76677453d..ef734dfb7 100644 --- a/gnu/packages/fonts.scm +++ b/gnu/packages/fonts.scm @@ -1213,26 +1213,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 -- 2.13.0