diff options
| author | Danny Milosavljevic <dannym@scratchpost.org> | 2017-04-15 15:49:47 +0200 |
|---|---|---|
| committer | Danny Milosavljevic <dannym@scratchpost.org> | 2017-04-15 15:49:47 +0200 |
| commit | 0ab1e8ae8892c92fd7a1fd07430ba6f2b710668d (patch) | |
| tree | 2a2187434185c3ca3a702eddd9f00e70979ed1fd | |
| parent | 99828febe05663c5d93dc52594eab28c6a1fe3d8 (diff) | |
| download | guix-0ab1e8ae8892c92fd7a1fd07430ba6f2b710668d.tar guix-0ab1e8ae8892c92fd7a1fd07430ba6f2b710668d.tar.gz | |
system: grub: Use (first all-entries) instead of (first entries).
* gnu/system/grub.scm (grub-configuration-file): Use (first all-entries)
instead of (first entries).
| -rw-r--r-- | gnu/system/grub.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gnu/system/grub.scm b/gnu/system/grub.scm index 4f9bde6a62..bcfc3beae6 100644 --- a/gnu/system/grub.scm +++ b/gnu/system/grub.scm @@ -298,9 +298,9 @@ corresponding to old generations of the system." #$initrd))))) (mlet %store-monad ((sugar (eye-candy config - (menu-entry-device (first entries)) + (menu-entry-device (first all-entries)) (menu-entry-device-mount-point - (first entries)) + (first all-entries)) #:system system #:port #~port))) (define builder |