mirror/guix
mirror/guix
1
Fork 0
mirror of https://https.git.savannah.gnu.org/git/guix.git/ synced 2025-07-17 12:30:38 +02:00
Code Releases Activity

system: reconfigure: Use the disk-installer if provided.

Browse source 
Fixes: <https://issues.guix.gnu.org/44101>.

* gnu/build/bootloader.scm (write-file-on-device): Pass 'no-fail flag instead
of 'no-create. Use a latin-1 transcoder.
* guix/scripts/system/reconfigure.scm (install-bootloader-program): Add a
"disk-installer" argument and use it as a fallback.
(install-bootloader): Adapt accordingly.
* gnu/tests/reconfigure.scm (run-install-bootloader-test): Ditto.
This commit is contained in:
Mathieu Othacehe 2020-10-21 10:42:50 +02:00
parent 25e811583f
commit a38d861e57
No known key found for this signature in database
GPG key ID: 8354763531769CA6
3 changed files with 22 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

4
gnu/tests/reconfigure.scm
View file

@ -260,7 +260,9 @@ bootloader's configuration file."
;; test suite, the bootloader installer script is omitted. 'grub-install'
;; would attempt to write directly to the virtual disk if the
;; installation script were run.
(test (install-bootloader-program #f #f bootcfg bootcfg-file #f "/")))))
(test
(install-bootloader-program #f #f #f bootcfg bootcfg-file #f "/")))))
(define %test-switch-to-system
(system-test