mirror of
https://codeberg.org/guix/guix.git
synced 2026-01-25 03:55:08 -06:00
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 <rutherther@ditigal.xyz>
This commit is contained in:
parent
7ad0b7ec2a
commit
333e1e5eda
1 changed files with 6 additions and 1 deletions
|
|
@ -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")))
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue