[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
17/18: gnu: kwindowsystem: Fix some test-cases (test-suite still disable
From: |
Hartmut Goebel |
Subject: |
17/18: gnu: kwindowsystem: Fix some test-cases (test-suite still disabled). |
Date: |
Thu, 8 Jun 2017 13:15:34 -0400 (EDT) |
htgoebel pushed a commit to branch master
in repository guix.
commit ed4a3ec68c24693fcefe8ca7c1f55d62cc5bf482
Author: Hartmut Goebel <address@hidden>
Date: Mon Jun 5 00:42:08 2017 +0200
gnu: kwindowsystem: Fix some test-cases (test-suite still disabled).
Make five tests pass, three are still failing – thus the test-suite is still
disabled. This commit's aim is to retain the progress.
* gnu/packages/kde-frameworks.scm (kwindowsystem)[native-inputs]: Add dbus.
[arguments]<#:test?>: Change comment. <#:phases>: Replace phase `check` by
new one befind 'install'.
---
gnu/packages/kde-frameworks.scm | 27 ++++++++++++++++++++++++++-
1 file changed, 26 insertions(+), 1 deletion(-)
diff --git a/gnu/packages/kde-frameworks.scm b/gnu/packages/kde-frameworks.scm
index e9c8b88..18e445e 100644
--- a/gnu/packages/kde-frameworks.scm
+++ b/gnu/packages/kde-frameworks.scm
@@ -1013,6 +1013,7 @@ configuration pages, message boxes, and password
requests.")
(native-inputs
`(("extra-cmake-modules" ,extra-cmake-modules)
("pkg-config" ,pkg-config)
+ ("dbus" ,dbus) ; for the tests
("qttools" ,qttools)
("xorg-server" ,xorg-server))) ; for the tests
(inputs
@@ -1021,7 +1022,31 @@ configuration pages, message boxes, and password
requests.")
("qtx11extras" ,qtx11extras)
("xcb-utils-keysyms" ,xcb-util-keysyms)))
(arguments
- `(#:tests? #f)) ; FIXME: 8/10 tests fail.
+ `(#:tests? #f ; FIXME: 3/12 tests fail.
+ #:phases
+ (modify-phases %standard-phases
+ (delete 'check)
+ (add-after 'install 'check
+ (lambda* (#:key inputs outputs tests? #:allow-other-keys)
+ ;; TODO: Simplify and use "common" phases when test-suite passes
+ (if tests?
+ (begin
+ (let ((out (assoc-ref outputs "out")))
+ (setenv "QT_PLUGIN_PATH"
+ (string-append out "/lib/plugins:"
+ (getenv "QT_PLUGIN_PATH"))))
+ ;; The test suite requires a running X server, setting
+ ;; QT_QPA_PLATFORM=offscreen does not suffice and even make
+ ;; some tests fail.
+ (system (string-append (assoc-ref inputs "xorg-server")
+ "/bin/Xvfb :1 -screen 0 640x480x24
&"))
+ (setenv "DISPLAY" ":1")
+ (setenv "CTEST_OUTPUT_ON_FAILURE" "1")
+ (setenv "DBUS_FATAL_WARNINGS" "0")
+ (zero? (system* "dbus-launch" "ctest" ".")))
+ (begin
+ (format #t "test suite not run~%")
+ #t)))))))
(home-page "https://community.kde.org/Frameworks")
(synopsis "KDE access to the windowing system")
(description "KWindowSystem provides information about and allows
- 05/18: gnu: kde frameworks: Avoid requiring xorg-server for tests., (continued)
- 05/18: gnu: kde frameworks: Avoid requiring xorg-server for tests., Hartmut Goebel, 2017/06/08
- 11/18: gnu: kpackage: Add more optional inputs., Hartmut Goebel, 2017/06/08
- 13/18: gnu: gpgmepp: Superseded by gpgme., Hartmut Goebel, 2017/06/08
- 06/18: gnu: kimageformats: Add more optional and recommended inputs., Hartmut Goebel, 2017/06/08
- 08/18: gnu: kinit: Add more optional inputs., Hartmut Goebel, 2017/06/08
- 10/18: gnu: plasma-framework: Add more optional inputs., Hartmut Goebel, 2017/06/08
- 12/18: gnu: sonnet: Add optional input (spell-checker)., Hartmut Goebel, 2017/06/08
- 09/18: gnu: ktexteditor: Add more optional inputs., Hartmut Goebel, 2017/06/08
- 15/18: gnu: kiconthemes: Re-enable tests., Hartmut Goebel, 2017/06/08
- 16/18: gnu: kwidgetsaddons: Re-enable tests., Hartmut Goebel, 2017/06/08
- 17/18: gnu: kwindowsystem: Fix some test-cases (test-suite still disabled).,
Hartmut Goebel <=
- 18/18: gnu: kde.scm, kde-frameworks.scm: Add and update comments., Hartmut Goebel, 2017/06/08