38 lines
1.1 KiB
Scheme
38 lines
1.1 KiB
Scheme
(define-module (systems base)
|
|
#:use-module (gnu)
|
|
#:use-module (guix)
|
|
#:export (system-config))
|
|
|
|
(use-service-modules networking ssh)
|
|
|
|
(define (system-config system)
|
|
(operating-system
|
|
(inherit system)
|
|
(timezone "Etc/UTC")
|
|
(locale "en_DK.utf8")
|
|
|
|
(users (cons (user-account
|
|
(name "muon")
|
|
(group "users")
|
|
(home-directory "/home/muon")
|
|
(supplementary-groups
|
|
'("wheel" "netdev" "kvm" "tty" "input" "audio" "video")))
|
|
%base-user-accounts))
|
|
|
|
(packages (append (map specification->package
|
|
'("git"
|
|
"glibc-locales"
|
|
"nss-certs"
|
|
"gnupg"
|
|
"curl"
|
|
"cryptsetup"
|
|
"openssl"
|
|
"polkit"
|
|
"vim"))
|
|
%base-packages))
|
|
|
|
(services (append (list (service dhcpcd-service-type)
|
|
(service openssh-service-type))
|
|
%base-services))))
|
|
|
|
|