38/38: gnu: glib-networking: Skip flaky tests.

[guix-commits]

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

commit 229f6a975487ff80044a12f24f9112414ddea1f9
Author: Greg Hogan <c...@greghogan.com>
AuthorDate: Fri Jul 25 12:44:37 2025 +0000

    gnu: glib-networking: Skip flaky tests.
    
    * gnu/packages/gnome.scm (glib-networking)[arguments]<#:phases>: Add
    'mark-tests-for-exclusion phase.
    <#:test-options>: Exclude flaky tests.
    
    Change-Id: I535c57eb90e1629e9c1d4cb468da6c183e51bcf4
---
 gnu/packages/gnome.scm | 11 +++++++++++
 1 file changed, 11 insertions(+)

diff --git a/gnu/packages/gnome.scm b/gnu/packages/gnome.scm
index 671f0d7c3b..4abeed27e9 100644
--- a/gnu/packages/gnome.scm
+++ b/gnu/packages/gnome.scm
@@ -5049,6 +5049,17 @@ indicators etc).")
                (base32
                 "17zhkf2pjwrghdgk5nhfvzqakb2xwk2jj19316xjr0s9n3djv3z4"))))
     (build-system meson-build-system)
+    (arguments
+     (list
+      ;; Exclude flaky tests (https://codeberg.org/guix/guix/issues/1377).
+      #:test-options #~(list "--no-suite" "connection")
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-after 'unpack 'mark-tests-for-exclusion
+            (lambda _
+              (substitute* "tls/tests/meson.build"
+                (("test\\(([^)]*)\\)" _ args)
+                 (string-append "test(" args ", suite: program[0])"))))))))
     (native-inputs
      (list `(,glib "bin") ; for gio-querymodules
            pkg-config gettext-minimal))