From fee6227db2eb02072fd4425ea927afa06251737c Mon Sep 17 00:00:00 2001 From: Marek Paśnikowski Date: Sat, 12 Oct 2024 08:10:40 +0200 Subject: refactor(amd64): remove unused bootloader code --- machines/amd64.scm | 15 --------------- 1 file changed, 15 deletions(-) diff --git a/machines/amd64.scm b/machines/amd64.scm index 08b1eb2..6532ef9 100644 --- a/machines/amd64.scm +++ b/machines/amd64.scm @@ -1,10 +1,4 @@ (define-module (machines amd64) - ;; bootloader-configuration - #:use-module (gnu bootloader) - - ;; grub-bootloader - #:use-module (gnu bootloader grub) - ;; file-system ;; swap-space #:use-module (gnu system file-systems) @@ -16,15 +10,6 @@ ;; microcode-initrd #:use-module (nongnu system linux-initrd)) -;; bootloader-configuration -(define-public (bootloader-configuration* keyboard-layout*) - (let ((bootloader* grub-bootloader) - (bootloader-targets (list "/dev/sdb")) ; TODO: generalize the target - ) - (bootloader-configuration (bootloader bootloader*) - (targets bootloader-targets) - (keyboard-layout keyboard-layout*)))) - ;; string -> ;; (list record* file-system) (define-public (file-systems* host-name*) -- cgit v1.2.3