From 9c71a2aec48583e8189ea3057f7dd2e6866edb7a Mon Sep 17 00:00:00 2001 From: Ludovic Courtès Date: Sat, 15 Jun 2013 23:38:31 +0200 Subject: build-system/trivial: Fix introduction of `%target' when cross-building. * guix/build-system/trivial.scm (trivial-cross-build): Wrap BUILDER in a `let' rather than in `begin'. --- guix/build-system/trivial.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'guix') diff --git a/guix/build-system/trivial.scm b/guix/build-system/trivial.scm index af54f51419..85a3c697e3 100644 --- a/guix/build-system/trivial.scm +++ b/guix/build-system/trivial.scm @@ -54,7 +54,7 @@ (define* (trivial-cross-build store name target source inputs native-inputs search-paths native-search-paths) "Like `trivial-build', but in a cross-compilation context." (build-expression->derivation store name system - `(begin (define %target ,target) ,builder) + `(let ((%target ,target)) ,builder) (append native-inputs inputs) #:outputs outputs #:modules modules -- cgit v1.2.3