diff options
| author | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2023-01-08 13:06:17 +0100 |
|---|---|---|
| committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2023-01-08 15:17:59 +0100 |
| commit | 6e55c1732cabe0f3d681b3fd901de7cb067ddb5f (patch) | |
| tree | f51d419a80b70c119a51f423f0be6a2c6f8a6a5c | |
| parent | bf707d29e5238d19a968d60c51e8bf3424abc481 (diff) | |
| download | guix-6e55c1732cabe0f3d681b3fd901de7cb067ddb5f.tar.gz | |
gnu: rosegarden: Run tests.
* gnu/packages/music.scm (rosegarden)[arguments]<#:phases>: Actually run tests. Also fix or skip failing tests.
| -rw-r--r-- | gnu/packages/music.scm | 14 |
1 files changed, 11 insertions, 3 deletions
diff --git a/gnu/packages/music.scm b/gnu/packages/music.scm index f2e8827b32..a73968ffe6 100644 --- a/gnu/packages/music.scm +++ b/gnu/packages/music.scm @@ -5036,7 +5036,8 @@ specification and header.") (add-after 'unpack 'patch-tests (lambda _ (substitute* "CMakeLists.txt" - (("BUILD_TESTING OFF") "BUILD_TESTING ON") + (("(BUILD_TESTING .* )OFF" _ prefix) + (string-append prefix "ON")) ;; Make tests work. ((" -fvisibility=hidden") "")))) (add-after 'unpack 'fix-references @@ -5075,10 +5076,17 @@ specification and header.") (add-before 'check 'prepare-check (lambda _ (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") + (chmod "/tmp/foo" #o700) (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 (list alsa-lib bash-minimal |