41/47: gnu: diffutils: Remove test-perror2 from XFAIL_TESTS for the Hurd.

[guix-commits]

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

commit 6a204375c4fbdcad0d723b347cec68b7cc7d1912
Author: Janneke Nieuwenhuizen <janneke@gnu.org>
AuthorDate: Sat Jun 3 08:47:34 2023 +0200

    gnu: diffutils: Remove test-perror2 from XFAIL_TESTS for the Hurd.
    
    * gnu/packages/base.scm (diffutils)[arguments]: When building for the Hurd,
    Move "large-subopt" test from #:make-flags' XFAIL_TESTS to a new 
'skip-tests'
    phase.  Remove #:make-flags for the Hurd, as "test-perror2" now passes.
---
 gnu/packages/base.scm | 12 +++++++++---
 1 file changed, 9 insertions(+), 3 deletions(-)

diff --git a/gnu/packages/base.scm b/gnu/packages/base.scm
index 2c7d6e500b..e451fb281c 100644
--- a/gnu/packages/base.scm
+++ b/gnu/packages/base.scm
@@ -302,9 +302,15 @@ differences.")
             (patches (search-patches 
"diffutils-fix-signal-processing.patch"))))
    (build-system gnu-build-system)
    (arguments
-    `(#:make-flags ,(if (hurd-target?)
-                        ''("XFAIL_TESTS=test-perror2 large-subopt")
-                        ''())))
+    (list
+     #:phases (if (hurd-target?)
+                  #~(modify-phases %standard-phases
+                      (add-after 'unpack 'skip-tests
+                        (lambda _
+                          (substitute* "tests/large-subopt"
+                            (("^#!.*" all)
+                             (string-append all "exit 77;\n"))))))
+                  #~%standard-phases)))
    (native-inputs (list perl))
    (synopsis "Comparing and merging files")
    (description