me/guix
Archived
1
0
Fork 0
Code Activity

gnu: rosegarden: Run tests.

Browse source 
* gnu/packages/music.scm (rosegarden)[arguments]<#:phases>: Actually run
tests.  Also fix or skip failing tests.
This commit is contained in:
Nicolas Goaziou 2023-01-08 13:06:17 +01:00
parent bf707d29e5
commit 6e55c1732c
No known key found for this signature in database
GPG key ID: DA00B4F048E92F2D
1 changed files with 11 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

14
gnu/packages/music.scm
View file

@ -5036,7 +5036,8 @@ specification and header.")
(add-after 'unpack 'patch-tests (add-after 'unpack 'patch-tests
(lambda _ (lambda _
(substitute* "CMakeLists.txt" (substitute* "CMakeLists.txt"
(("BUILD_TESTING OFF") "BUILD_TESTING ON") (("(BUILD_TESTING .* )OFF" _ prefix)
(string-append prefix "ON"))
;; Make tests work. ;; Make tests work.
((" -fvisibility=hidden") "")))) ((" -fvisibility=hidden") ""))))
(add-after 'unpack 'fix-references (add-after 'unpack 'fix-references
@ -5075,10 +5076,17 @@ specification and header.")
(add-before 'check 'prepare-check (add-before 'check 'prepare-check
(lambda _ (lambda _
(setenv "QT_QPA_PLATFORM" "offscreen") (setenv "QT_QPA_PLATFORM" "offscreen")
;; Tests create files in $HOME/.local/share/rosegarden . ;; Tests create files in $HOME/.local/share/rosegarden and
;; expect permissions set to 0700.
(mkdir-p "/tmp/foo") (mkdir-p "/tmp/foo")
(chmod "/tmp/foo" #o700)
(setenv "HOME" "/tmp/foo") (setenv "HOME" "/tmp/foo")
(setenv "XDG_RUNTIME_DIR" "/tmp/foo")))))) (setenv "XDG_RUNTIME_DIR" "/tmp/foo")))
(replace 'check
(lambda* (#:key tests? #:allow-other-keys)
(when tests?
;; Skip a failing test.
(invoke "ctest" "-E" "test_notationview_selection")))))))
(inputs (inputs
(list alsa-lib (list alsa-lib
bash-minimal bash-minimal