.
This commit is contained in:
parent
4ebcbe3171
commit
691891cf08
2 changed files with 4 additions and 4 deletions
|
@ -105,7 +105,7 @@ The variable ~%local-filesystem~ extracts the file system definitions from the i
|
||||||
As a sibling to the former, the variable ~%local-swap~ does the same with the swap partition.
|
As a sibling to the former, the variable ~%local-swap~ does the same with the swap partition.
|
||||||
|
|
||||||
#+begin_src scheme :tangle config.scm
|
#+begin_src scheme :tangle config.scm
|
||||||
#;(define %local-swap
|
(define %local-swap
|
||||||
(call-with-input-file "/etc/config.scm"
|
(call-with-input-file "/etc/config.scm"
|
||||||
(lambda (port)
|
(lambda (port)
|
||||||
(read port)
|
(read port)
|
||||||
|
@ -283,7 +283,7 @@ This is the full operating system specification.
|
||||||
'("/boot/efi"))
|
'("/boot/efi"))
|
||||||
(keyboard-layout keyboard-layout)))
|
(keyboard-layout keyboard-layout)))
|
||||||
(file-systems %local-filesystem)
|
(file-systems %local-filesystem)
|
||||||
#;(swap-devices %local-swap)
|
(swap-devices %local-swap)
|
||||||
(users
|
(users
|
||||||
(cons*
|
(cons*
|
||||||
(user-account
|
(user-account
|
||||||
|
|
|
@ -73,7 +73,7 @@ nil
|
||||||
|
|
||||||
|
|
||||||
;; [[file:config.org::*File System][File System:2]]
|
;; [[file:config.org::*File System][File System:2]]
|
||||||
#;(define %local-swap
|
(define %local-swap
|
||||||
(call-with-input-file "/etc/config.scm"
|
(call-with-input-file "/etc/config.scm"
|
||||||
(lambda (port)
|
(lambda (port)
|
||||||
(read port)
|
(read port)
|
||||||
|
@ -109,7 +109,7 @@ nil
|
||||||
'("/boot/efi"))
|
'("/boot/efi"))
|
||||||
(keyboard-layout keyboard-layout)))
|
(keyboard-layout keyboard-layout)))
|
||||||
(file-systems %local-filesystem)
|
(file-systems %local-filesystem)
|
||||||
#;(swap-devices %local-swap)
|
(swap-devices %local-swap)
|
||||||
(users
|
(users
|
||||||
(cons*
|
(cons*
|
||||||
(user-account
|
(user-account
|
||||||
|
|
Loading…
Reference in a new issue