This commit is contained in:
Daniel Ziltener 2023-11-30 13:34:55 +01:00
parent 07e6fc2b29
commit b060aba9b0
Signed by: zilti
GPG key ID: B38976E82C9DAE42

View file

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