[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

06/07: gnu: SeaBIOS: Simplify build.

From: guix-commits
Subject: 06/07: gnu: SeaBIOS: Simplify build.
Date: Sat, 17 Dec 2022 11:09:32 -0500 (EST)

mbakke pushed a commit to branch master
in repository guix.

commit ec76f45d30ad24f76a4274d92e79231c3d9bc7de
Author: Marius Bakke <>
AuthorDate: Sat Dec 17 01:12:40 2022 +0100

    gnu: SeaBIOS: Simplify build.
    * gnu/packages/firmware.scm (seabios)[arguments]: Don't install bios.bin
    twice.  Drop redundant append step.
 gnu/packages/firmware.scm | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/gnu/packages/firmware.scm b/gnu/packages/firmware.scm
index 781d8ae004..a4e43e71ec 100644
--- a/gnu/packages/firmware.scm
+++ b/gnu/packages/firmware.scm
@@ -450,7 +450,7 @@ executing in M-mode.")
                                                (string-drop-right entry 2))
                                        (format port "CONFIG_~a~%" entry)))
                                  (cons "BUILD_VGABIOS=y" config))))
-                   (apply invoke "make" (append flags '("oldnoconfig")))
+                   (apply invoke "make" "oldnoconfig" flags)
                    (apply invoke "make" flags)
                    (link (string-append target "/bios.bin")
                          (string-append "out/" target ".bin")))))
@@ -469,8 +469,6 @@ executing in M-mode.")
            (lambda* (#:key outputs #:allow-other-keys)
              (let* ((out (assoc-ref outputs "out"))
                     (fmw (string-append out "/share/firmware")))
-               (mkdir-p fmw)
-               (copy-file "out/bios.bin" (string-append fmw "/bios.bin"))
                (for-each (lambda (bios)
                            (install-file bios fmw))
                          (find-files "out" "\\.bin$"))

reply via email to

[Prev in Thread] Current Thread [Next in Thread]