summary refs log tree commit diff
path: root/gnu/packages/firmware.scm
diff options
context:
space:
mode:
authorMarius Bakke <marius@gnu.org>2023-01-12 04:13:55 +0100
committerMarius Bakke <marius@gnu.org>2023-01-13 03:19:40 +0100
commitffb9813aeebaf74a3808e7c6731c7eaaafc9379f (patch)
tree1004e959ec4197542b9ecd94e4d7686c3a7d3bf5 /gnu/packages/firmware.scm
parent2a93b66882c5d52b3872a26b19a609dd2b4e99fb (diff)
downloadguix-ffb9813aeebaf74a3808e7c6731c7eaaafc9379f.tar.gz
gnu: ovmf-arm: Fix syntax error on armhf-linux.
* gnu/packages/firmware.scm (ovmf-arm)[arguments]: Don't add an empty set-env
phase when building for armhf-linux.
Diffstat (limited to 'gnu/packages/firmware.scm')
-rw-r--r--gnu/packages/firmware.scm10
1 files changed, 5 insertions, 5 deletions
diff --git a/gnu/packages/firmware.scm b/gnu/packages/firmware.scm
index 529200118d..b6ee4c0565 100644
--- a/gnu/packages/firmware.scm
+++ b/gnu/packages/firmware.scm
@@ -926,11 +926,11 @@ Virtual Machines.  OVMF contains a sample UEFI firmware for QEMU and KVM.")
      (substitute-keyword-arguments (package-arguments ovmf)
        ((#:phases phases)
         #~(modify-phases #$phases
-            (add-before 'configure 'set-env
-              (lambda _
-                #$@(if (not (string-prefix? "armhf" (%current-system)))
-                       #~((setenv "GCC49_ARM_PREFIX" "arm-linux-gnueabihf-"))
-                       #~())))
+            #$@(if (string-prefix? "armhf" (%current-system))
+                   '()
+                   '((add-before 'configure 'set-env
+                       (lambda _
+                         (setenv "GCC49_ARM_PREFIX" "arm-linux-gnueabihf-")))))
             (replace 'build
               (lambda _
                 (invoke "build" "-a" "ARM" "-t" "GCC49"