ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2025-01-24 11:39:46 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

guix system: Fix bootloader config file generation by 'guix system roll-back'.

Browse source 
Fixes <https://bugs.gnu.org/33623>.
Reported by Diego Nicola Barbato <dnbarbato@posteo.de>.

Regression introduced in commit
46c296dcc4.

* guix/scripts/system.scm (reinstall-bootloader): Add call to
'lower-object'.
This commit is contained in:
Ludovic Courtès 2018-12-07 15:12:21 +01:00
parent 6eac835f17
commit 6ddc63e599
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
1 changed files with 4 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
guix/scripts/system.scm
View file

@ -497,9 +497,10 @@ (define (reinstall-bootloader store number)
(old-entries (map boot-parameters->menu-entry old-params)))
(run-with-store store
(mlet* %store-monad
((bootcfg ((bootloader-configuration-file-generator bootloader)
bootloader-config entries
#:old-entries old-entries))
((bootcfg (lower-object
((bootloader-configuration-file-generator bootloader)
bootloader-config entries
#:old-entries old-entries)))
(bootcfg-file -> (bootloader-configuration-file bootloader))
(target -> "/")
(drvs -> (list bootcfg)))