diff options
| author | Marek Paśnikowski <marek@marekpasnikowski.pl> | 2024-10-12 08:10:40 +0200 |
|---|---|---|
| committer | Marek Paśnikowski <marek@marekpasnikowski.pl> | 2024-10-12 08:11:01 +0200 |
| commit | fee6227db2eb02072fd4425ea927afa06251737c (patch) | |
| tree | a0c0c66a4a4fd9f12f232ceb78a787750fed3ccb | |
| parent | 33eecd41e77dfe7de708305eb40550b5d20b1cc0 (diff) | |
refactor(amd64): remove unused bootloader code
| -rw-r--r-- | machines/amd64.scm | 15 |
1 files changed, 0 insertions, 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*) |