08/16: system: hurd: Add hurd-grub-minimal-bootloader.

[guix-commits]

janneke pushed a commit to branch wip-hurd-vm
in repository guix.

commit b2e9a990d742165a876d50654846fe223b611e1e
Author: Jan (janneke) Nieuwenhuizen <address@hidden>
AuthorDate: Sat Apr 25 14:56:05 2020 +0200

    system: hurd: Add hurd-grub-minimal-bootloader.
    
    * gnu/system/hurd.scm (hurd-grub-minimal-bootloader): New public variable.
---
 gnu/system/hurd.scm | 9 ++++++++-
 1 file changed, 8 insertions(+), 1 deletion(-)

diff --git a/gnu/system/hurd.scm b/gnu/system/hurd.scm
index fccdc87..536cca3 100644
--- a/gnu/system/hurd.scm
+++ b/gnu/system/hurd.scm
@@ -21,6 +21,7 @@
   #:use-module (guix gexp)
   #:use-module (guix profiles)
   #:use-module (guix utils)
+  #:use-module (gnu bootloader)
   #:use-module (gnu bootloader grub)
   #:use-module (gnu packages admin)
   #:use-module (gnu packages base)
@@ -33,7 +34,8 @@
   #:use-module (gnu packages less)
   #:use-module (gnu system vm)
   #:export (cross-hurd-image
-            hurd-grub-configuration-file))
+            hurd-grub-configuration-file
+            hurd-grub-minimal-bootloader))
 
 ;;; Commentary:
 ;;;
@@ -90,6 +92,11 @@ menuentry \"GNU\" {
                                  #+mach #+mach #+hurd
                                  #+libc #+hurd))))))
 
+(define hurd-grub-minimal-bootloader
+  (bootloader
+   (inherit grub-minimal-bootloader)
+   (configuration-file-generator hurd-grub-configuration-file)))
+
 (define* (cross-hurd-image #:key (hurd hurd) (gnumach gnumach))
   "Return a cross-built GNU/Hurd image."