guix_mirror_bot pushed a commit to branch master
in repository guix.
commit 7782a47f7fbf7775ac0af1b46fa1ec0ddab99eb1
Author: Artyom V. Poptsov <[email protected]>
AuthorDate: Wed Jan 7 10:19:53 2026 +0300
gnu: make-u-boot-installer: Use the original file name.
* gnu/bootloader/u-boot.scm (make-u-boot-installer): Use the original file
name without the Guix store file prefix when installing a plain file.
Change-Id: Ica2707878c1dd5f7d3b805499a0a38ca76e315af
Signed-off-by: Rutherther <[email protected]>
---
gnu/bootloader/u-boot.scm | 7 ++++++-
1 file changed, 6 insertions(+), 1 deletion(-)
diff --git a/gnu/bootloader/u-boot.scm b/gnu/bootloader/u-boot.scm
index 4c74f62000..3b20fd721d 100644
--- a/gnu/bootloader/u-boot.scm
+++ b/gnu/bootloader/u-boot.scm
@@ -65,7 +65,12 @@
((? string?)
(list #~(install-file (string-append bootloader #$file)
install-dir)))
- ((? file-like?) (list #~(install-file #$file install-dir)))
+ ((? file-like?)
+ (list #~(mkdir-p install-dir)
+ #~(copy-file #$file
+ (string-append install-dir
+ "/"
+ #$(plain-file-name file)))))
(#f '()))))
#~(lambda (bootloader device mount-point)
(let ((install-dir (string-append mount-point "/boot")))
