installer: Emit 'bootloader' field before 'swap-devices'.

* gnu/installer/parted.scm (user-partitions->configuration): Move
'bootloader' section above 'swap-devices'.
This commit is contained in:
Ludovic Courtès 2019-03-26 21:58:41 +01:00
parent 37099f5844
commit 54043bf23f
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5

View File

@ -1270,10 +1270,10 @@ from (gnu system mapped-devices) and return it."
(swap-devices (map user-partition-file-name swap-user-partitions))
(encrypted-partitions
(filter user-partition-crypt-label user-partitions)))
`(,@(if (null? swap-devices)
`((bootloader ,@(bootloader-configuration user-partitions))
,@(if (null? swap-devices)
'()
`((swap-devices (list ,@swap-devices))))
(bootloader ,@(bootloader-configuration user-partitions))
,@(if (null? encrypted-partitions)
'()
`((mapped-devices