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/bootloaders.scm | |
| parent | d298e7652abaa1a51c0ecc71b1fd9dcdae541c23 (diff) | |
| download | guix-2ac42fe51fcbd9b9f36fcfce350da2d483dc0cc9.tar 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/bootloaders.scm')
| -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 |