build-system: glib-or-gtk: Improve glib-or-gtk-cross-build style.

* guix/build-system/glib-or-gtk.scm
(glib-or-gtk-cross-build): Use with-imported-modules around the
glib-or-gtk-cross-build builder gexp.

Change-Id: I8eaa032ffc0a3f8dbf02c96a4ecee85475c32111
Signed-off-by: Christopher Baines <mail@cbaines.net>
This commit is contained in:
Nicolas Graves 2025-04-25 11:26:31 +02:00 committed by Christopher Baines
parent aa7b1abf2c
commit 4c4e29cebb
No known key found for this signature in database
GPG key ID: 5E28A33B0B84F577

View file

@ -225,6 +225,7 @@
disallowed-references)
"Cross-build SOURCE with INPUTS. See GNU-BUILD for more details."
(define builder
(with-imported-modules imported-modules
#~(begin
(use-modules #$@(sexp->gexp modules))
@ -272,8 +273,7 @@
#:strip-binaries? #$strip-binaries?
#:strip-flags #$strip-flags
#:strip-directories
#$strip-directories)))
#$strip-directories))))
(mlet %store-monad ((guile (package->derivation (or guile (default-guile))
system #:graft? #f)))
@ -281,7 +281,6 @@
#:system system
#:target target
#:graft? #f
#:modules imported-modules
#:allowed-references allowed-references
#:disallowed-references disallowed-references
#:guile-for-build guile)))