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 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)) ;;;