[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
01/01: packages: Apply target triplet in bag-transitive-host-inputs.
From: |
guix-commits |
Subject: |
01/01: packages: Apply target triplet in bag-transitive-host-inputs. |
Date: |
Mon, 26 Aug 2019 09:40:32 -0400 (EDT) |
davexunit pushed a commit to branch master
in repository guix.
commit 6cef554be8926b026226b4bfd0bb2f37bd24aeae
Author: David Thompson <address@hidden>
Date: Thu Aug 1 08:46:13 2019 -0400
packages: Apply target triplet in bag-transitive-host-inputs.
Fixes a bug where propagated inputs that should be cross-compiled are
instead
compiled for the host system.
* guix/packages.scm (bag-transitive-host-inputs): Call transitive-inputs in
the context of the bag's target system triplet.
---
guix/packages.scm | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/guix/packages.scm b/guix/packages.scm
index c94a651..143417b 100644
--- a/guix/packages.scm
+++ b/guix/packages.scm
@@ -796,7 +796,8 @@ dependencies are known to build on SYSTEM."
(define (bag-transitive-host-inputs bag)
"Same as 'package-transitive-target-inputs', but applied to a bag."
- (transitive-inputs (bag-host-inputs bag)))
+ (parameterize ((%current-target-system (bag-target bag)))
+ (transitive-inputs (bag-host-inputs bag))))
(define (bag-transitive-target-inputs bag)
"Return the \"target inputs\" of BAG, recursively."