TakeV/guix
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

gnu: font-tex-gyre: Use 'font-build-system'.

Browse source 
* gnu/packages/fonts.scm (font-tex-gyre): Switch to font-build-system.
[source]: Use url-fetch/zipbomb.
This commit is contained in:
Arun Isaac 2017-06-16 11:17:13 +05:30
parent 40b784b4c7
commit c226f06c59
No known key found for this signature in database
GPG key ID: 2E25EE8B61802BB3
1 changed files with 2 additions and 17 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

19
gnu/packages/fonts.scm
View file

@ -555,28 +555,13 @@ (define-public font-tex-gyre
(version "2.005") (version "2.005")
(source (source
(origin (origin
(method url-fetch) (method url-fetch/zipbomb)
(uri (string-append "http://www.gust.org.pl/projects/e-foundry/" (uri (string-append "http://www.gust.org.pl/projects/e-foundry/"
"tex-gyre/whole/tg-" version "otf.zip")) "tex-gyre/whole/tg-" version "otf.zip"))
(sha256 (sha256
(base32 (base32
"0kph9l3g7jb2bpmxdbdg5zl56wacmnvdvsdn7is1gc750sqvsn31")))) "0kph9l3g7jb2bpmxdbdg5zl56wacmnvdvsdn7is1gc750sqvsn31"))))
(build-system trivial-build-system) (build-system font-build-system)
(arguments
`(#:modules ((guix build utils))
#:builder
(begin
(use-modules (guix build utils))
(let ((unzip (string-append (assoc-ref %build-inputs "unzip")
"/bin/unzip"))
(font-dir (string-append %output "/share/fonts/opentype")))
(mkdir-p font-dir)
(system* unzip
(assoc-ref %build-inputs "source")
"-d" font-dir)))))
(native-inputs
`(("unzip" ,unzip)))
(home-page "http://www.gust.org.pl/projects/e-foundry/tex-gyre/") (home-page "http://www.gust.org.pl/projects/e-foundry/tex-gyre/")
(synopsis "Remake of Ghostscript fonts") (synopsis "Remake of Ghostscript fonts")
(description "The TeX Gyre collection of fonts is the result of an (description "The TeX Gyre collection of fonts is the result of an