.

2023-11-30 13:34:55 +01:00 · 2023-11-30 13:34:55 +01:00 · b060aba9b0
commit b060aba9b0
parent 07e6fc2b29
1 changed files with 8 additions and 5 deletions
--- a/config.scm
+++ b/config.scm
@ -27,6 +27,13 @@
                     wm
                     xorg)

+(define %local-filesystem
+  (call-with-input-file "/etc/config.scm"
+    (lambda (port)
+      (read port)
+      (read port)
+      (cdr (last-pair (read port))))))
+
 (operating-system
 (host-name "ziltis-machine")
 (timezone "Europe/Berlin")
@ -40,11 +47,7 @@
   (targets
    '("/boot/efi"))
   (keyboard-layout keyboard-layout)))
- #~(file-systems #$(call-with-input-file "/etc/config.scm"
-                   (lambda (port)
-                     (read port)
-                     (read port)
-                     (cdr (last-pair (read port))))))
+ (file-systems %local-filesystem)
 #;(file-systems
  (cons*
   (file-system