diff options
| author | Marek Paśnikowski <marek@marekpasnikowski.pl> | 2024-10-13 17:06:21 +0200 |
|---|---|---|
| committer | Marek Paśnikowski <marek@marekpasnikowski.pl> | 2024-10-13 17:06:21 +0200 |
| commit | 8e5f71712a28c206d4d937e4d9794a487bb5188a (patch) | |
| tree | d68d5c53877d4e82fb54dd649fb42a228b859158 /systems | |
| parent | c13149846099e768efae6c2c126047c1b9d3d4bb (diff) | |
refactor(mcdowell): create dynamic reference to the system device for grub
Diffstat (limited to 'systems')
| -rw-r--r-- | systems/mcdowell.scm | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/systems/mcdowell.scm b/systems/mcdowell.scm index feb088e..0d20837 100644 --- a/systems/mcdowell.scm +++ b/systems/mcdowell.scm @@ -11,8 +11,9 @@ ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; -(define bootloader-target-mcdowell - "/dev/sdb") +(define (bootloader-target-mcdowell) + (use-modules (machines amd64)) + (bootloader-device-path host-name*)) (define (desktop-services-mcdowell) (use-modules (suweren system)) @@ -41,7 +42,7 @@ ((@ (gnu bootloader) bootloader-configuration) (bootloader (grub-mkrescue-bootloader-mcdowell)) (keyboard-layout keyboard-layout-mcdowell) - (targets (list bootloader-target-mcdowell)))) + (targets (list (bootloader-target-mcdowell))))) (define services-mcdowell (append (desktop-services-mcdowell) |