73/85: gnu: guile-git: Skip http proxy test for the Hurd.

[guix-commits]

janneke pushed a commit to branch hurd-team
in repository guix.

commit 9a4058405ca8e7d35087d97943c7fae0469a30c0
Author: Janneke Nieuwenhuizen <janneke@gnu.org>
AuthorDate: Tue Jun 13 09:37:07 2023 +0200

    gnu: guile-git: Skip http proxy test for the Hurd.
    
    * gnu/packages/guile.scm (guile-git)[arguments]: When building for the Hurd,
    add phase 'skip-tests/hurd'.
---
 gnu/packages/guile.scm | 15 ++++++++++++++-
 1 file changed, 14 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/guile.scm b/gnu/packages/guile.scm
index ad0619bb49..574e66c197 100644
--- a/gnu/packages/guile.scm
+++ b/gnu/packages/guile.scm
@@ -839,7 +839,20 @@ type system, elevating types to first-class status.")
                  (lambda _
                    (substitute* "Makefile.am"
                      ((".*tests/blob\\.scm.*") ""))))))
-           '())))
+           '())
+       ,@(if (target-hurd?)
+             (list
+              #:phases
+              #~(modify-phases %standard-phases
+                  (add-after 'unpack 'skip-tests/hurd
+                    (lambda _
+                      (substitute* "tests/proxy.scm"
+                        (("\\(test-begin.*" all)
+                         (string-append
+                          all
+                          "(when (string-ci= \"GNU\" (vector-ref (uname) 0))\n"
+                          "  (test-skip 1))\n")))))))
+             '())))
     (native-inputs
      (list pkg-config autoconf automake texinfo guile-3.0 
guile-bytestructures))
     (inputs