branch core-updates updated: gnu: dbus: Re-introduce extended test timeout.

[guix-commits]

This is an automated email from the git hooks/post-receive script.

efraim pushed a commit to branch core-updates
in repository guix.

The following commit(s) were added to refs/heads/core-updates by this push:
     new 7b7bc91  gnu: dbus: Re-introduce extended test timeout.
7b7bc91 is described below

commit 7b7bc91c3d7fba306884cd1681d12b51246c2aea
Author: Efraim Flashner <efraim@flashner.co.il>
AuthorDate: Thu May 6 09:39:42 2021 +0300

    gnu: dbus: Re-introduce extended test timeout.
    
    This reverses removing this phase in
    a24562af52d2f318c9e17be73393ddb4bd9e347c, which is still needed by some
    slower machines.
    
    * gnu/packages/glib.scm (glib)[arguments]: Add 'increase-test-timeout
    phase to ensure tests which don't hang also don't timeout.
---
 gnu/packages/glib.scm | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/gnu/packages/glib.scm b/gnu/packages/glib.scm
index 7e49fca..2649326 100644
--- a/gnu/packages/glib.scm
+++ b/gnu/packages/glib.scm
@@ -204,6 +204,12 @@ shared NFS home directories.")
        #:configure-flags '("-Dman=true")
        #:phases
        (modify-phases %standard-phases
+         ;; Needed to pass the test phase on slower ARM and i686 machines.
+         (add-after 'unpack 'increase-test-timeout
+           (lambda _
+             (substitute* "meson.build"
+               (("(test_timeout.*) = ([[:digit:]]+)" all first second)
+                (string-append first " = " second "0")))))
          (add-after 'unpack 'disable-failing-tests
            (lambda _
              (with-directory-excursion "glib/tests"