Subject: [PATCH] build-system/guile: Expose #:scheme-file-regexp when cross-compiling
From: [email-masked]
To: [email-masked]
Cc: Jelle Licht <[email-masked]>
Date: Mon, 20 Feb 2023 00:19:18 +0100
List-Id: <debbugs-submit.debbugs.gnu.org>

From: Jelle Licht <[email-masked]>

* guix/build-system/guile.scm (guile-cross-build): Accept #:scheme-file-regexp
and pass it on to builder.
---
 guix/build-system/guile.scm | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/guix/build-system/guile.scm b/guix/build-system/guile.scm
index ffc892260a..7e2e33c13e 100644
--- a/guix/build-system/guile.scm
+++ b/guix/build-system/guile.scm
@@ -129,6 +129,7 @@ (define* (guile-cross-build name
 
                             (phases '%standard-phases)
                             (source-directory ".")
+                            (scheme-file-regexp %scheme-file-regexp)
                             not-compiled-file-regexp
                             (compile-flags %compile-flags)
                             (imported-modules %guile-build-system-modules)
@@ -154,6 +155,7 @@ (define* (guile-cross-build name
                        #:target #$target
                        #:outputs %outputs
                        #:source-directory #$source-directory
+                       #:scheme-file-regexp #$scheme-file-regexp
                        #:not-compiled-file-regexp #$not-compiled-file-regexp
                        #:compile-flags #$compile-flags
                        #:inputs %build-target-inputs

base-commit: 57495d063587e9301feddbe051abe2f97ca038be
-- 
2.39.1