unofficial mirror of guix-patches@gnu.org 
 help / color / mirror / code / Atom feed
* [bug#74265] [PATCH] guix: packages: Fix building development profiles.
@ 2024-11-08 14:44 pjals--- via Guix-patches via
  2024-11-12 22:44 ` Ludovic Courtès
  0 siblings, 1 reply; 2+ messages in thread
From: pjals--- via Guix-patches via @ 2024-11-08 14:44 UTC (permalink / raw)
  To: 74265; +Cc: Daniel [REDACTED]

From: "Daniel [REDACTED]" <pjals@privacyrequired.com>

* guix/packages.scm (bag-transitive-inputs): Set %current-target-system while
finding bag transitive inputs.

Change-Id: If33a0fc2bf038e09819c87f535c27dfe5e873973
---
 guix/packages.scm | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/guix/packages.scm b/guix/packages.scm
index f373136d22..40d5e7b1d5 100644
--- a/guix/packages.scm
+++ b/guix/packages.scm
@@ -1443,12 +1443,6 @@ (define (bag-direct-inputs bag)
           (bag-host-inputs bag)
           (bag-target-inputs bag)))
 
-(define (bag-transitive-inputs bag)
-  "Same as 'package-transitive-inputs', but applied to a bag."
-  (parameterize ((%current-target-system #f)
-                 (%current-system (bag-system bag)))
-    (transitive-inputs (bag-direct-inputs bag))))
-
 (define (bag-transitive-build-inputs bag)
   "Same as 'package-transitive-native-inputs', but applied to a bag."
   (parameterize ((%current-target-system #f)
@@ -1467,6 +1461,12 @@ (define (bag-transitive-target-inputs bag)
                  (%current-system (bag-system bag)))
     (transitive-inputs (bag-target-inputs bag))))
 
+(define (bag-transitive-inputs bag)
+  "Same as 'package-transitive-inputs', but applied to a bag."
+  (append (bag-transitive-build-inputs bag)
+          (bag-transitive-host-inputs bag)
+          (bag-transitive-target-inputs bag)))
+
 (define* (package-development-inputs package
                                      #:optional (system (%current-system))
                                      #:key target)

base-commit: 2a6d96425eea57dc6dd48a2bec16743046e32e06
-- 
2.46.0





^ permalink raw reply related	[flat|nested] 2+ messages in thread

end of thread, other threads:[~2024-11-12 22:51 UTC | newest]

Thread overview: 2+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2024-11-08 14:44 [bug#74265] [PATCH] guix: packages: Fix building development profiles pjals--- via Guix-patches via
2024-11-12 22:44 ` Ludovic Courtès

Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/guix.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).