diff options
author | Mathieu Othacehe <m.othacehe@gmail.com> | 2017-11-05 12:01:26 +0100 |
---|---|---|
committer | Mathieu Othacehe <m.othacehe@gmail.com> | 2017-11-06 19:53:13 +0100 |
commit | 2ac42fe51fcbd9b9f36fcfce350da2d483dc0cc9 (patch) | |
tree | 169f69c8321e073da2d6245292eb8156fd58911c /gnu/packages | |
parent | d298e7652abaa1a51c0ecc71b1fd9dcdae541c23 (diff) | |
download | guix-2ac42fe51fcbd9b9f36fcfce350da2d483dc0cc9.tar.gz |
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.
Diffstat (limited to 'gnu/packages')
-rw-r--r-- | gnu/packages/bootloaders.scm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/gnu/packages/bootloaders.scm b/gnu/packages/bootloaders.scm index 62282c99c8..8c093ebe6a 100644 --- a/gnu/packages/bootloaders.scm +++ b/gnu/packages/bootloaders.scm @@ -338,7 +338,8 @@ also initializes the boards (RAM etc).") (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 |