gnu: font-dosis: Switch to font-build-system.

* gnu/packages/fonts.scm (font-dosis): Switch to font-build-system.
[source]: Use url-fetch/zipbomb.
[native-inputs]: Remove unzip.
This commit is contained in:
Arun Isaac 2019-01-15 15:24:16 +05:30
parent 4deeb1ed06
commit 6aa4f09eb6
No known key found for this signature in database
GPG Key ID: 2E25EE8B61802BB3
1 changed files with 3 additions and 29 deletions

View File

@ -19,7 +19,7 @@
;;; Copyright © 2017 Alex Griffin <a@ajgrf.com> ;;; Copyright © 2017 Alex Griffin <a@ajgrf.com>
;;; Copyright © 2017 Clément Lassieur <clement@lassieur.org> ;;; Copyright © 2017 Clément Lassieur <clement@lassieur.org>
;;; Copyright © 2017 Brendan Tildesley <brendan.tildesley@openmailbox.org> ;;; Copyright © 2017 Brendan Tildesley <brendan.tildesley@openmailbox.org>
;;; Copyright © 2017, 2018 Arun Isaac <arunisaac@systemreboot.net> ;;; Copyright © 2017, 2018, 2019 Arun Isaac <arunisaac@systemreboot.net>
;;; Copyright © 2017 Mohammed Sadiq <sadiq@sadiqpk.org> ;;; Copyright © 2017 Mohammed Sadiq <sadiq@sadiqpk.org>
;;; Copyright © 2018 Charlie Ritter <chewzerita@posteo.net> ;;; Copyright © 2018 Charlie Ritter <chewzerita@posteo.net>
;;; Copyright © 2018 Gabriel Hondet <gabrielhondet@gmail.com> ;;; Copyright © 2018 Gabriel Hondet <gabrielhondet@gmail.com>
@ -1163,39 +1163,13 @@ itself."))))
(version "1.7") (version "1.7")
(source (source
(origin (origin
(method url-fetch) (method url-fetch/zipbomb)
(uri (string-append "http://www.impallari.com/media/releases/dosis-" (uri (string-append "http://www.impallari.com/media/releases/dosis-"
"v" version ".zip")) "v" version ".zip"))
(sha256 (sha256
(base32 (base32
"1qhci68f68mf87jd69vjf9qjq3wydgw1q7ivn3amjb65ls1s0c4s")))) "1qhci68f68mf87jd69vjf9qjq3wydgw1q7ivn3amjb65ls1s0c4s"))))
(build-system trivial-build-system) (build-system font-build-system)
(arguments
`(#:modules ((guix build utils))
#:builder (begin
(use-modules (guix build utils)
(srfi srfi-26))
(let ((PATH (string-append (assoc-ref %build-inputs
"unzip")
"/bin"))
(ttf-dir (string-append %output
"/share/fonts/truetype"))
(otf-dir (string-append %output
"/share/fonts/opentype")))
(setenv "PATH" PATH)
(invoke "unzip" (assoc-ref %build-inputs "source"))
(mkdir-p ttf-dir)
(mkdir-p otf-dir)
(for-each (lambda (ttf)
(install-file ttf ttf-dir))
(find-files "." "\\.ttf$"))
(for-each (lambda (otf)
(install-file otf otf-dir))
(find-files "." "\\.otf$"))
#t))))
(native-inputs `(("unzip" ,unzip)))
(home-page "http://www.impallari.com/dosis") (home-page "http://www.impallari.com/dosis")
(synopsis "Very simple, rounded, sans serif family") (synopsis "Very simple, rounded, sans serif family")
(description (description