summary refs log tree commit diff
path: root/gnu/packages/mes.scm
diff options
context:
space:
mode:
authorMarius Bakke <mbakke@fastmail.com>2017-05-17 15:49:04 +0200
committerMarius Bakke <mbakke@fastmail.com>2017-05-17 16:14:01 +0200
commit5afc737363977a41880d57cd47907cacd7f1de0c (patch)
tree39fba3488dcb7b07eaa80488715593393fb1059a /gnu/packages/mes.scm
parente7620b649c2351a3f01b5201e6e9f0b0996e78f5 (diff)
downloadguix-5afc737363977a41880d57cd47907cacd7f1de0c.tar.gz
gnu: mes: Don't fail when (%current-target-system) is #f.
* gnu/packages/mes.scm (mes)[native-inputs]: Test string equality differently.
Diffstat (limited to 'gnu/packages/mes.scm')
-rw-r--r--gnu/packages/mes.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/gnu/packages/mes.scm b/gnu/packages/mes.scm
index 66b0654de5..1e233a852d 100644
--- a/gnu/packages/mes.scm
+++ b/gnu/packages/mes.scm
@@ -75,8 +75,8 @@ extensive examples, including parsers for the Javascript and C99 languages.")
        `(("nyacc" ,nyacc)))
       (native-inputs
        `(("guile" ,guile-2.2)
-         ,@(if (or (equal? (%current-system) "x86_64-linux")
-                   (string-prefix? (%current-target-system) "x86_64-linux"))
+         ,@(if (string-prefix? "x86_64-linux" (or (%current-target-system)
+                                                  (%current-system)))
                ;; Use cross-compiler rather than #:system "i686-linux" to get
                ;; MesCC 64 bit .go files installed ready for use with Guile.
                `(("i686-linux-binutils" ,(cross-binutils triplet))