From b658d324dfb1fb1e246606b696c57e765c822faf Mon Sep 17 00:00:00 2001
From: Lilah Tascheter <lilah@lunabee.space>
Date: Tue, 6 Aug 2024 19:11:17 -0500
Subject: [PATCH] gnu: bootloader: Remove obsolete bootloader fields.

* gnu/bootloader.scm (bootloader)[package, disk-image-installer,
configuration-file, configuration-file-generator]: Remove fields.

Change-Id: I3654d160f7306bb45a78b82ea6b249ff4281f739
---
 gnu/bootloader.scm | 16 +++-------------
 1 file changed, 3 insertions(+), 13 deletions(-)

diff --git a/gnu/bootloader.scm b/gnu/bootloader.scm
index b1ed187aa2..522dd2fa7d 100644
--- a/gnu/bootloader.scm
+++ b/gnu/bootloader.scm
@@ -69,12 +69,8 @@ (define-module (gnu bootloader)
             bootloader
             bootloader?
             bootloader-name
-            bootloader-package
             bootloader-default-targets
             bootloader-installer
-            bootloader-disk-image-installer
-            bootloader-configuration-file
-            bootloader-configuration-file-generator
 
             bootloader-target
             bootloader-target?
@@ -290,16 +286,10 @@ (define (sexp->device device-sexp)
 ;; has to be described by this record.
 
 (define-record-type* <bootloader>
-  bootloader make-bootloader
-  bootloader?
-  (name                            bootloader-name)
-  (package                         bootloader-package)
+  bootloader make-bootloader bootloader?
+  (name            bootloader-name)
   (default-targets bootloader-default-targets (default '()))
-  (installer                       bootloader-installer)
-  (disk-image-installer            bootloader-disk-image-installer
-                                   (default #f))
-  (configuration-file              bootloader-configuration-file)
-  (configuration-file-generator    bootloader-configuration-file-generator))
+  (installer       bootloader-installer))
 
 
 ;;;