guixconfig/config.scm
2023-11-30 14:29:14 +01:00

135 lines
3.6 KiB
Scheme

;; -*- mode: guix-scheme -*-
(use-modules
(gnu)
(gnu image)
(gnu services authentication)
(gnu services avahi)
(gnu services base)
(gnu services dbus)
(gnu services desktop)
(gnu services linux)
(gnu services networking)
(gnu services pm)
(gnu services virtualization)
(gnu services xorg)
(gnu system nss))
(use-service-modules desktop
xorg)
(use-package-modules bootloaders
certs
emacs
emacs-xyz
fonts
terminals
wm
xorg)
(define %local-filesystem
(call-with-input-file "/etc/config.scm"
(lambda (port)
(read port)
(read port)
(eval (cadar (last-pair (read port)))
(interaction-environment)))))
(operating-system
(host-name "ziltis-machine")
(timezone "Europe/Berlin")
(locale "de_DE.utf8")
(keyboard-layout
(keyboard-layout "de" #:options
'("caps:swapescape")))
(bootloader
(bootloader-configuration
(bootloader grub-efi-bootloader)
(targets
'("/boot/efi"))
(keyboard-layout keyboard-layout)))
(file-systems %local-filesystem)
(swap-devices
(list
(swap-space
(target "/dev/disk/by-partlabel/swap")
(discard? #t))))
(users
(cons*
(user-account
(name "zilti")
(group "users")
(supplementary-groups
'("wheel"
"netdev"
"audio"
"video"
"libvirt")))
%base-user-accounts))
(packages
(append
(specifications->packages
(list
"nss-certs"
"readline"
"emacs"
"emacs-desktop-environment"
"font-terminus"
"git"
"kitty"
"swayfx"))
%base-packages))
(services
(append
(modify-services
%desktop-services
#;(delete login-service-type)
(delete mingetty-service-type)
(delete console-font-service-type))
(list
(service tlp-service-type)
(service thermald-service-type
(thermald-configuration
(adaptive? #t)))
(service bluetooth-service-type)
(service inputattach-service-type)
(service fstrim-service-type)
(service earlyoom-service-type
(earlyoom-configuration
(minimum-available-memory 5)
(minimum-free-swap 5)))
(service greetd-service-type
(greetd-configuration
(greeter-supplementary-groups
(list "video" "input"))
(terminals
(list
(greetd-terminal-configuration
(terminal-vt "1"))
(greetd-terminal-configuration
(terminal-vt "2"))
(greetd-terminal-configuration
(terminal-vt "3"))
(greetd-terminal-configuration
(terminal-vt "4"))
(greetd-terminal-configuration
(terminal-vt "5"))
(greetd-terminal-configuration
(terminal-vt "6"))
(greetd-terminal-configuration
(terminal-vt "7")
(terminal-switch #t)
(default-session-command
(greetd-wlgreet-sway-session
(sway swayfx))))))))
(service fprintd-service-type)
(service screen-locker-service-type
(screen-locker-configuration
(name "swaylock")
(program
(file-append swaylock-effects "/bin/swaylock"))
(using-setuid? #f)))
(service libvirt-service-type
(libvirt-configuration
(unix-sock-group "libvirt"))))))
(name-service-switch %mdns-host-lookup-nss))