diff --git a/config.scm b/config.scm index d65dc12..1df9663 100644 --- 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