me
/
guix
Archived
1
0
Fork 0

gnu: font-google-material-design-icons: Use 'font-build-system'.

* gnu/packages/fonts.scm (font-google-material-design-icons): Re-indent.
Switch to font-build-system.

Signed-off-by: 宋文武 <iyzsong@member.fsf.org>
master
Arun Isaac 2017-06-24 23:09:00 +08:00 committed by 宋文武
parent 0e5c9cf530
commit 99e9d598e3
No known key found for this signature in database
GPG Key ID: 26525665AE727D37
1 changed files with 16 additions and 39 deletions

View File

@ -1055,30 +1055,7 @@ monospace, slab-serif fonts.")
(base32
"183n0qv3q8w6n27libarq1fhc4mqv2d3sasbfmbn7x9r5pw9c6ga"))
(file-name (string-append name "-" version ".tar.gz"))))
(build-system trivial-build-system)
(native-inputs
`(("tar" ,tar)
("gzip" ,gzip)))
(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"))
(font-filename "MaterialIcons-Regular.ttf")
(src-ttf-file (string-append "material-design-icons-"
,version
"/iconfont/"
font-filename))
(dest-ttf-file (string-append font-dir font-filename))
(gzip (assoc-ref %build-inputs "gzip"))
(tar (assoc-ref %build-inputs "tar")))
(setenv "PATH" (string-append gzip "/bin:"
tar "/bin:"))
(system* "tar" "xf" source)
(mkdir-p font-dir)
(copy-file src-ttf-file dest-ttf-file)))))
(build-system font-build-system)
(home-page "http://google.github.io/material-design-icons")
(synopsis "Icon font of Google Material Design icons")
(description