futurile/guix-play
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

gnu: font-chiron-sung-hk: Split outputs.

Browse Source 
* gnu/packages/fonts.scm (font-chiron-sung-hk)[arguments]: Split outputs.
[outputs]: Add "otf" and "ttf".

Change-Id: Id96bba47e8f9ae9404a528bcceab3e110a05db4e
This commit is contained in:
Hilton Chain 2024-02-27 23:12:24 +08:00
parent e4265aa97f
commit a900fa3c6c
No known key found for this signature in database
GPG Key ID: ACC66D09CA528292
1 changed files with 14 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
gnu/packages/fonts.scm
View File

@ -3332,6 +3332,20 @@ dialects in Hong Kong and Taiwan.")))
(base32 (base32
"1916bb834y4r4312g14zid7w3pbx1i70jcgkkfbf4z20grrj891m")))) "1916bb834y4r4312g14zid7w3pbx1i70jcgkkfbf4z20grrj891m"))))
(build-system font-build-system) (build-system font-build-system)
(arguments
(list #:phases
#~(modify-phases %standard-phases
(replace 'install
(lambda _
(let ((install (assoc-ref %standard-phases 'install)))
(with-directory-excursion "VAR"
(for-each delete-file (find-files "." "\\.ttf$"))
(install #:outputs `(("out" . ,#$output))))
(with-directory-excursion "OTF"
(install #:outputs `(("out" . ,#$output:otf))))
(with-directory-excursion "TTF"
(install #:outputs `(("out" . ,#$output:ttf))))))))))
(outputs '("out" "otf" "ttf"))
(home-page "https://chiron-fonts.github.io/") (home-page "https://chiron-fonts.github.io/")
(synopsis "Traditional Chinese Song typeface") (synopsis "Traditional Chinese Song typeface")
(description (description