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

gnu: denemo: Honor TESTS?.

Browse source 
* gnu/packages/music.scm (denemo)[arguments]<#:phases>: Honor TESTS? keyword.
This commit is contained in:
Nicolas Goaziou 2022-03-12 19:23:09 +01:00
parent 33331efc46
commit 504d15a593
No known key found for this signature in database
GPG key ID: DA00B4F048E92F2D
1 changed files with 10 additions and 9 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

19
gnu/packages/music.scm
View file

@ -632,16 +632,17 @@ (define-public denemo
#:phases
#~(modify-phases %standard-phases
(replace 'check
(lambda* (#:key inputs #:allow-other-keys)
(lambda* (#:key inputs tests? #:allow-other-keys)
;; Tests require to write $HOME.
(setenv "HOME" (getcwd))
;; Replace hard-coded diff file name.
(substitute* "tests/integration.c"
(("/usr/bin/diff")
(search-input-file inputs "/bin/diff")))
;; Denemo's documentation says to use this command to run its
;; test suite.
(invoke "make" "-C" "tests" "check")))
(when tests?
(setenv "HOME" (getcwd))
;; Replace hard-coded diff file name.
(substitute* "tests/integration.c"
(("/usr/bin/diff")
(search-input-file inputs "/bin/diff")))
;; Denemo's documentation says to use this command to run its
;; test suite.
(invoke "make" "-C" "tests" "check"))))
(add-before 'build 'set-lilypond
;; This phase sets the default path for lilypond to its current
;; location in the store.