diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2016-04-27 18:17:25 +0200 |
|---|---|---|
| committer | 宋文武 <iyzsong@gmail.com> | 2016-05-02 22:06:39 +0800 |
| commit | ba470833c2d675f6f0a8202f6962a42ad18f57bd (patch) | |
| tree | d709f61daa4e3e440e55e989dc807ba48f604236 | |
| parent | 33cd9bef2c2715c21601ef7dde479df84aa2e7ec (diff) | |
| download | guix-ba470833c2d675f6f0a8202f6962a42ad18f57bd.tar.gz | |
gnu: gtkmm: Run Xvfb for tests.
* gnu/packages/gtk.scm (gtkmm)[arguments]: New field.
| -rw-r--r-- | gnu/packages/gtk.scm | 15 |
1 files changed, 14 insertions, 1 deletions
diff --git a/gnu/packages/gtk.scm b/gnu/packages/gtk.scm index f31a510504..432371133a 100644 --- a/gnu/packages/gtk.scm +++ b/gnu/packages/gtk.scm @@ -916,13 +916,26 @@ toolkit.") "12h2kd22iayvjfhmgjccm33igrbvqdj7hym31fsa1y0dhwzmf8gh")))) (build-system gnu-build-system) (native-inputs `(("pkg-config" ,pkg-config) - ("glib" ,glib "bin"))) ;for 'glib-compile-resources' + ("glib" ,glib "bin") ;for 'glib-compile-resources' + ("xorg-server" ,xorg-server))) (propagated-inputs `(("pangomm" ,pangomm) ("cairomm" ,cairomm) ("atkmm" ,atkmm) ("gtk+" ,gtk+) ("glibmm" ,glibmm))) + (arguments + '(#:phases (modify-phases %standard-phases + (add-before 'check 'run-xvfb + (lambda* (#:key inputs #:allow-other-keys) + (let ((xorg-server (assoc-ref inputs "xorg-server"))) + ;; Tests such as 'object_move/test' require a running + ;; X server. + (system (string-append xorg-server "/bin/Xvfb :1 &")) + (setenv "DISPLAY" ":1") + ;; Don't fail because of the missing /etc/machine-id. + (setenv "DBUS_FATAL_WARNINGS" "0") + #t)))))) (home-page "http://gtkmm.org/") (synopsis "C++ interface to the GTK+ graphical user interface library") |