me/guix
Archived
1
0
Fork 0
Code Activity

gnu: font-gnu-unifont: Build from source.

Browse source 
* gnu/packages/fonts.scm (font-gnu-unifont)[source]: Add snippet to
remove precompiled fonts.
[arguments]: Add make-flag to build fonts. Add custom phase to adjust
shell invocations.
[native-inputs]: Add bdftopcf, console-setup, fontforge.
[inputs]: Add perl-gd.
This commit is contained in:
Efraim Flashner 2022-10-24 22:42:54 +03:00
parent 81c6a28eb0
commit 3f0ea68177
No known key found for this signature in database
GPG key ID: 41AAE7DCCA3D8351
1 changed files with 15 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

18
gnu/packages/fonts.scm
View file

@ -85,6 +85,7 @@
#:use-module (gnu packages bash) #:use-module (gnu packages bash)
#:use-module (gnu packages compression) #:use-module (gnu packages compression)
#:use-module (gnu packages fontutils) #:use-module (gnu packages fontutils)
#:use-module (gnu packages gd)
#:use-module (gnu packages gettext) #:use-module (gnu packages gettext)
#:use-module (gnu packages glib) #:use-module (gnu packages glib)
#:use-module (gnu packages gtk) #:use-module (gnu packages gtk)
@ -857,7 +858,11 @@ for use at smaller text sizes")))
(string-append "mirror://gnu/unifont/unifont-" (string-append "mirror://gnu/unifont/unifont-"
version "/unifont-" version ".tar.gz"))) version "/unifont-" version ".tar.gz")))
(sha256 (sha256
(base32 "1m9lfss6sbmcr0b6h7pxxmdl71j9dmnvk8idvxzylqrwpwjaj4bx")))) (base32 "1m9lfss6sbmcr0b6h7pxxmdl71j9dmnvk8idvxzylqrwpwjaj4bx"))
(snippet
'(begin
(use-modules (guix build utils))
(delete-file-recursively "font/precompiled")))))
(build-system gnu-build-system) (build-system gnu-build-system)
(outputs '("out" ; TrueType/OpenType version (outputs '("out" ; TrueType/OpenType version
"pcf" ; PCF (bitmap) version "pcf" ; PCF (bitmap) version
@ -866,10 +871,15 @@ for use at smaller text sizes")))
(arguments (arguments
`(#:tests? #f ; no check target `(#:tests? #f ; no check target
#:make-flags #:make-flags
(list (string-append "CC=" ,(cc-for-target))) (list (string-append "CC=" ,(cc-for-target))
"BUILDFONT=TRUE")
#:phases #:phases
(modify-phases %standard-phases (modify-phases %standard-phases
(delete 'configure) (delete 'configure)
(add-after 'unpack 'patch-source
(lambda _
(substitute* (find-files "." "Makefile")
(("/bin/sh -s") (string-append (which "sh") " -s")))))
(replace 'install (replace 'install
(lambda* (#:key make-flags outputs #:allow-other-keys) (lambda* (#:key make-flags outputs #:allow-other-keys)
(let* ((ttf (string-append (assoc-ref outputs "out") (let* ((ttf (string-append (assoc-ref outputs "out")
@ -895,8 +905,10 @@ for use at smaller text sizes")))
(invoke "gzip" "-9n" "doc/unifont.info") (invoke "gzip" "-9n" "doc/unifont.info")
(install-file "doc/unifont.info.gz" (install-file "doc/unifont.info.gz"
(string-append bin "/share/info")))))))) (string-append bin "/share/info"))))))))
(native-inputs
(list bdftopcf console-setup fontforge))
(inputs (inputs
(list perl)) ; for utilities (list perl perl-gd)) ; for utilities
(synopsis (synopsis
"Large bitmap font covering Unicode's Basic Multilingual Plane") "Large bitmap font covering Unicode's Basic Multilingual Plane")
(description (description