gnu: uboot: Fix same-arch? check.

* gnu/packages/bootloaders.scm (make-u-boot-package): Compare %current-system
  to system associated to given triplet. Comparing a system and a triplet
  didn't make sense.
This commit is contained in:
Mathieu Othacehe 2017-11-05 12:01:26 +01:00
parent d298e7652a
commit 2ac42fe51f
No known key found for this signature in database
GPG key ID: 8354763531769CA6

View file

@ -338,7 +338,8 @@ (define u-boot
(define (make-u-boot-package board triplet)
"Returns a u-boot package for BOARD cross-compiled for TRIPLET."
(let ((same-arch? (if (string-prefix? (%current-system) triplet)
(let ((same-arch? (if (string-prefix? (%current-system)
(gnu-triplet->nix-system triplet))
`#t
`#f)))
(package