ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-12-25 22:08:16 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

build: font-build-system: Do not return #t from phases.

Browse source 
* guix/build/font-build-system.scm (unpack, install): Do not return #t from
phases.
This commit is contained in:
Arun Isaac 2022-03-20 15:03:24 +05:30
parent 0c272b6e7a
commit 3d0e92de09
No known key found for this signature in database
GPG key ID: 2E25EE8B61802BB3
1 changed files with 2 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
guix/build/font-build-system.scm
View file

@ -41,8 +41,7 @@ (define* (unpack #:key source #:allow-other-keys)
(begin
(mkdir "source")
(chdir "source")
(copy-file source (strip-store-file-name source))
#t)
(copy-file source (strip-store-file-name source)))
(gnu:unpack #:source source)))
(define* (install #:key outputs #:allow-other-keys)
@ -55,8 +54,7 @@ (define* (install #:key outputs #:allow-other-keys)
(for-each (cut install-file <> (string-append fonts "/opentype"))
(find-files source "\\.(otf|otc)$"))
(for-each (cut install-file <> (string-append fonts "/web"))
(find-files source "\\.(woff|woff2)$"))
#t))
(find-files source "\\.(woff|woff2)$"))))
(define %standard-phases
(modify-phases gnu:%standard-phases