nixo
/
guix-devel
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

gnu: kpackage: Enable test-suite. 

* gnu/package/kde-frameworks.scm(kpackage)[arguments]
  <#:tests?>: Remove. <#:phases>: Add phase 'patch-tests.
This commit is contained in:
Hartmut Goebel 2019-01-02 00:41:53 +01:00
parent 6ca3218812
commit 8c81e9f2db
No known key found for this signature in database
GPG Key ID: 634A8DFFD3F631DF
1 changed files with 12 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
gnu/packages/kde-frameworks.scm
View File

@ -1835,8 +1835,7 @@ covers feedback and persistent events.")
("ki18n" ,ki18n) ("ki18n" ,ki18n)
("qtbase" ,qtbase))) ("qtbase" ,qtbase)))
(arguments (arguments
`(#:tests? #f ; FIXME: 3/9 tests fail. `(#:phases
#:phases
(modify-phases %standard-phases (modify-phases %standard-phases
(add-after 'unpack 'patch (add-after 'unpack 'patch
(lambda _ (lambda _
@ -1848,6 +1847,17 @@ covers feedback and persistent events.")
(("^\\s*(QDirIterator it\\(.*, QDirIterator::Subdirectories)(\\);)" _ a b) (("^\\s*(QDirIterator it\\(.*, QDirIterator::Subdirectories)(\\);)" _ a b)
(string-append a " | QDirIterator::FollowSymlinks" b))) (string-append a " | QDirIterator::FollowSymlinks" b)))
#t)) #t))
(add-after 'unpack 'patch-tests
(lambda _
;; /bin/ls doesn't exist in the build-container use /etc/passwd
(substitute* "autotests/packagestructuretest.cpp"
(("(addDirectoryDefinition\\(\")bin(\".*\")bin(\".*\")bin\""
_ a b c)
(string-append a "etc" b "etc" c "etc\""))
(("filePath\\(\"bin\", QStringLiteral\\(\"ls\"))")
"filePath(\"etc\", QStringLiteral(\"passwd\"))")
(("\"/bin/ls\"") "\"/etc/passwd\""))
#t))
(add-before 'check 'check-setup (add-before 'check 'check-setup
(lambda _ (lambda _
(setenv "HOME" (getcwd)) (setenv "HOME" (getcwd))