guix_mirror_bot pushed a commit to branch gnome-team
in repository guix.

commit 27cd2387845a99421eb29267bc4be0e4ade354ff
Author: Maxim Cournoyer <[email protected]>
AuthorDate: Mon Jul 28 17:15:21 2025 +0900

    gnu: tracker: Fix test suite.
    
    The same strategy as for the tinysparql and upower packages is used.
    
    * gnu/packages/gnome.scm (tracker) [phases] {set-gi-typelib-path}: New 
phase.
    {check}: Reorder after phase new phase.
    
    Change-Id: Ib1fe6c93f19a4d29f2b9172cfc837111eb2a01f5
---
 gnu/packages/gnome.scm | 13 +++++++------
 1 file changed, 7 insertions(+), 6 deletions(-)

diff --git a/gnu/packages/gnome.scm b/gnu/packages/gnome.scm
index 42a9f28908..59523da2e0 100644
--- a/gnu/packages/gnome.scm
+++ b/gnu/packages/gnome.scm
@@ -9726,10 +9726,6 @@ easy, safe, and automatic.")
     (arguments
      (list
       #:glib-or-gtk? #t
-      #:test-options `(list ,@(if (or (target-riscv64?)
-                                      (target-aarch64?))
-                                  `("--timeout-multiplier" "10")
-                                  '("--timeout-multiplier" "2")))
       #:configure-flags
       ;; Otherwise, the RUNPATH will lack the final path component.
       #~(list (string-append "-Dc_link_args=-Wl,-rpath="
@@ -9778,13 +9774,18 @@ easy, safe, and automatic.")
                 (substitute* "docs/manpages/meson.build"
                   (("/etc/asciidoc[^']+")
                    file)))))
-          (replace 'check
+          (delete 'check)               ;moved after install
+          (add-after 'install 'set-gi-typelib-path
+            (lambda* (#:key outputs #:allow-other-keys)
+              (setenv "GI_TYPELIB_PATH"
+                      (search-input-directory outputs 
"lib/girepository-1.0"))))
+          (add-after 'set-gi-typelib-path 'check
             (lambda* (#:key tests? test-options #:allow-other-keys)
               (when tests?
                 ;; Some tests expect to write to $HOME.
                 (setenv "HOME" "/tmp")
                 (apply invoke "dbus-run-session" "--" "meson" "test"
-                       "--print-errorlogs" test-options)))))))
+                       "--print-errorlogs" "-t0" test-options)))))))
     (native-inputs
      (list gettext-minimal
            `(,glib "bin")

Reply via email to