Re: [PATCH 4/5] gnu: openssl: Fixed cross-compile issues.

[Ludovic Courtès]

John Darrington <address@hidden> skribis:

> On Sat, Dec 14, 2013 at 06:57:59PM +0100, Ludovic Court??s wrote:
>      
>      > @@ -52,8 +52,8 @@
>      >                       (string-append "--prefix=" out)))))
>      >         (alist-cons-before
>      >          'patch-source-shebangs 'patch-tests
>      > -        (lambda* (#:key inputs #:allow-other-keys)
>      > -          (let ((bash (assoc-ref inputs "bash")))
>      > +        (lambda* (#:key inputs native-inputs #:allow-other-keys)
>      > +          (let ((bash (assoc-ref ,@(if (%current-target-system) 
> '(native-inputs) '(inputs)) "bash")))
>      
>      This can???t possibly work.
>
> I did test it, both for native compilation and cross-compilation.  In both 
> cases
>  it built succesfully (unlike before the patch).

Ah, sorry, I misread the unquoted part; apologies for that.

Still, I’d prefer the simpler (because it’s build-side code only):

  (assoc-ref (or native-inputs inputs) "bash")

WDYT?

Could you send an updated patch if that’s fine with you?

Ludo’.