03/03: build-system/guile: Expose #:scheme-file-regexp when cross-compiling

[guix-commits]

jlicht pushed a commit to branch master
in repository guix.

commit 7bbeaa87e3796d56cc762dcfbc340f9be301d5f6
Author: Jelle Licht <jlicht@fsfe.org>
AuthorDate: Mon Feb 20 00:19:18 2023 +0100

    build-system/guile: Expose #:scheme-file-regexp when cross-compiling
    
    * 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 @@
 
                             (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 @@
                        #: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