[bug#61641] [PATCH] build-system/guile: Expose #:scheme-file-regexp when cross-compiling

[jlicht]

From: Jelle Licht <jlicht@fsfe.org>

* 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