diff options
author | Hartmut Goebel <h.goebel@crazy-compilers.com> | 2019-01-02 00:41:53 +0100 |
---|---|---|
committer | Hartmut Goebel <h.goebel@crazy-compilers.com> | 2019-01-17 00:19:33 +0100 |
commit | 8c81e9f2db8fe25f2ba65d0f1f0ba34a6cc7b5e6 (patch) | |
tree | 5326076686a7c8e7a43cd07d6803e36836c9291d | |
parent | 6ca3218812c9bce3879eb11b4936f05d59e9d409 (diff) | |
download | guix-8c81e9f2db8fe25f2ba65d0f1f0ba34a6cc7b5e6.tar.gz |
gnu: kpackage: Enable test-suite.
* gnu/package/kde-frameworks.scm(kpackage)[arguments] <#:tests?>: Remove. <#:phases>: Add phase 'patch-tests.
-rw-r--r-- | gnu/packages/kde-frameworks.scm | 14 |
1 files changed, 12 insertions, 2 deletions
diff --git a/gnu/packages/kde-frameworks.scm b/gnu/packages/kde-frameworks.scm index f31e1432a2..d7120434f4 100644 --- a/gnu/packages/kde-frameworks.scm +++ b/gnu/packages/kde-frameworks.scm @@ -1835,8 +1835,7 @@ covers feedback and persistent events.") ("ki18n" ,ki18n) ("qtbase" ,qtbase))) (arguments - `(#:tests? #f ; FIXME: 3/9 tests fail. - #:phases + `(#:phases (modify-phases %standard-phases (add-after 'unpack 'patch (lambda _ @@ -1848,6 +1847,17 @@ covers feedback and persistent events.") (("^\\s*(QDirIterator it\\(.*, QDirIterator::Subdirectories)(\\);)" _ a b) (string-append a " | QDirIterator::FollowSymlinks" b))) #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 (lambda _ (setenv "HOME" (getcwd)) |