From 02477c6a4fe84058c6e06e3065363835c5be8f57 Mon Sep 17 00:00:00 2001
From: Janneke Nieuwenhuizen <janneke@gnu.org>
Date: Fri, 22 Nov 2024 21:48:19 +0100
Subject: gnu: guile-fibers-1.1: Resurrect cross-build.

The cross-build fix patch for guile-fibers-1.3.1 does not apply to
guile-fibers-1.1.

This is a follow-up to commit
    20c7b8dd04e421a139a02438cf1ddfdfe544a446
    gnu: guile-fibers: Fix cross-build to the Hurd.

* gnu/packages/guile-xyz.scm (guile-fibers-1.1)[arguments]: When
cross-building, remove stage "apply-cross-build-fix-patch".

Change-Id: I030264e79709bb6b9753461a998ce629a37e4c01
---
 gnu/packages/guile-xyz.scm | 7 +++++++
 1 file changed, 7 insertions(+)

(limited to 'gnu')

diff --git a/gnu/packages/guile-xyz.scm b/gnu/packages/guile-xyz.scm
index 044a491259f..a21289d368a 100644
--- a/gnu/packages/guile-xyz.scm
+++ b/gnu/packages/guile-xyz.scm
@@ -937,6 +937,13 @@ is not available for Guile 2.0.")
            guile-3.0            ;for 'guild compile
            ;; Gettext brings 'AC_LIB_LINKFLAGS_FROM_LIBS'
            gettext-minimal))
+    (arguments
+     (if (%current-target-system)
+         (substitute-keyword-arguments (package-arguments guile-fibers)
+           ((#:phases phases)
+            #~(modify-phases #$phases
+                (delete 'apply-cross-build-fix-patch))))
+         (package-arguments guile-fibers)))
     (inputs
      (list guile-3.0))                            ;for libguile-3.0.so
     (supported-systems
-- 
cgit v1.2.3