Hi David,

David Elsing <[email protected]> skribis:

> diff --git a/guix/packages.scm b/guix/packages.scm
> index 78726b089ae..43125bac61a 100644
> --- a/guix/packages.scm
> +++ b/guix/packages.scm
> @@ -1824,7 +1824,9 @@ (define (input-graft system)
>                          (return (graft
>                                    (origin orig)
>                                    (origin-output output)
> -                                  (replacement replacement)
> +                                  (replacement
> +                                   (with-parameters ((%current-system 
> system))
> +                                     replacement))
>                                    (replacement-output output))))
>                        package output system)
>               (return #f))))
> @@ -1846,7 +1848,10 @@ (define (input-cross-graft target system)
>                 (return (graft
>                           (origin orig)
>                           (origin-output output)
> -                         (replacement replacement)
> +                         (replacement
> +                          (with-parameters ((%current-system system)
> +                                            (%current-target-system target))
> +                            replacement))
>                           (replacement-output output))))

I think we should apply this patch, it makes perfect sense.

And yes, passing #:system in the ‘arguments’ field is valid: it’s used
in a handful of packages.

David, would you be willing/able to send it as a proper patch to
guix-patches, ideally with a test?

Thanks,
Ludo’.



Reply via email to