rewrite in a hope for fix

hebasto · Jan 21, 2025 · 70b134a · 70b134a
1 parent ae7bd53
commit 70b134a
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/contrib/guix/manifest.scm b/contrib/guix/manifest.scm
@@ -121,7 +121,8 @@ desirable for building Bitcoin Core release binaries."
     (search-our-patches "winpthreads-remap-guix-store.patch")))
 
 (define (make-mingw-w64-ucrt target)
-  (let* ((base-mingw-w64 (make-mingw-w64 (substring target 0 (string-index target #\-))
+  (let* ((machine (substring target 0 (string-index target #\-)))
+         (base-mingw-w64 (make-mingw-w64 machine
                                          #:xgcc (cross-gcc target #:xgcc (gcc-mingw-patches base-gcc))
                                          #:with-winpthreads? #t)))
     (package