(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))))