guix-epistemia

commit 4c39fb7f906637b4bc2cf6808e8a7e83df043ee8
parent b422b223f5c294962e3898986946900839cb0607
Author: Vineet Kumar <git@vineetk.net>
Date:   Fri,  8 May 2026 09:54:48 -0400

saklas: temporarily fix dedicated server config

Diffstat:
M
epistemia/bootloader.scm
 | 
18
++++++++++++++++++

1 file changed, 18 insertions(+), 0 deletions(-)
diff --git a/epistemia/bootloader.scm b/epistemia/bootloader.scm
@@ -21,3 +21,21 @@
               "set root=(hd0,gpt2)")
              ((" /store/") 
               " /gnu/@/store/")))))))
+
+;; TODO combine into previous with an argument?
+(define-public grub-zfs-bios
+  (bootloader
+    (inherit grub-bootloader)
+    (name 'grub-zfs)
+    (installer
+     #~(lambda (bootloader targets mount-point)
+         (use-modules (guix build utils))
+         (let ((standard-installer #$(bootloader-installer grub-bootloader)))
+           (standard-installer bootloader targets mount-point))
+         (let ((grub-cfg (string-append mount-point "/boot/grub/grub.cfg")))
+           (chmod grub-cfg #o644)
+           (substitute* grub-cfg
+             (("search --label --set [^ ]+")
+              "set root=(hd0,gpt2)")
+             ((" /store/")
+              " /gnu/@/store/")))))))