summaryrefslogtreecommitdiff
path: root/gnu
diff options
context:
space:
mode:
authorHartmut Goebel <h.goebel@crazy-compilers.com>2019-01-02 00:41:53 +0100
committerHartmut Goebel <h.goebel@crazy-compilers.com>2019-01-17 00:19:33 +0100
commit8c81e9f2db8fe25f2ba65d0f1f0ba34a6cc7b5e6 (patch)
tree5326076686a7c8e7a43cd07d6803e36836c9291d /gnu
parent6ca3218812c9bce3879eb11b4936f05d59e9d409 (diff)
gnu: kpackage: Enable test-suite.
* gnu/package/kde-frameworks.scm(kpackage)[arguments] <#:tests?>: Remove. <#:phases>: Add phase 'patch-tests.
Diffstat (limited to 'gnu')
-rw-r--r--gnu/packages/kde-frameworks.scm14
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))