gnu: cross-base: Remove unneeded 'let'.

This is a followup to 102d307520.

* gnu/packages/cross-base.scm (cross-libc): Remove (let ((libc libc)) …).

(cherry picked from commit 524a4e357c)
This commit is contained in:
Ludovic Courtès 2020-04-04 22:50:55 +02:00 committed by Marius Bakke
parent a533c5a183
commit be1e842ad7
No known key found for this signature in database
GPG key ID: A2A06DF2A33A54FA

View file

@ -479,12 +479,12 @@ (define* (cross-libc target
(native-libc target libc
#:xgcc xgcc
#:xbinutils xbinutils)
(let ((libc libc))
(package (inherit libc)
(package
(inherit libc)
(name (string-append "glibc-cross-" target))
(arguments
(substitute-keyword-arguments
`(;; Disable stripping (see above.)
`( ;; Disable stripping (see above.)
#:strip-binaries? #f
;; This package is used as a target input, but it should not have
@ -541,7 +541,7 @@ (define* (cross-libc target
"cross-mig")))
'())
,@(package-inputs libc) ;FIXME: static-bash
,@(package-native-inputs libc)))))))
,@(package-native-inputs libc))))))
(define* (native-libc target
#:optional