zilti/guixconfig
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

.

Browse source
This commit is contained in:
Daniel Ziltener 2023-11-28 23:38:08 +01:00
parent 0d429ab564
commit d388221901
Signed by: zilti
GPG key ID: B38976E82C9DAE42
1 changed files with 108 additions and 102 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

210
config.scm
View file

@ -1,12 +1,13 @@
;; -*- mode: guix-scheme -*- ;; -*- mode: guix-scheme -*-
(use-modules (gnu) (use-modules
(gnu services avahi) (gnu)
(gnu services base) (gnu services avahi)
(gnu services desktop) (gnu services base)
(gnu services networking) (gnu services desktop)
(gnu services pm) (gnu services networking)
(gnu system nss)) (gnu services pm)
(gnu system nss))
(use-service-modules desktop) (use-service-modules desktop)
@ -21,99 +22,104 @@
(host-name "ziltis-machine") (host-name "ziltis-machine")
(timezone "Europe/Berlin") (timezone "Europe/Berlin")
(locale "de_DE.utf8") (locale "de_DE.utf8")
(bootloader (bootloader-configuration (bootloader
(bootloader grub-efi-bootloader) (bootloader-configuration
(targets '("/boot/efi")) (bootloader grub-efi-bootloader)
(keyboard-layout (targets
(keyboard-layout "de")))) '("/boot/efi"))
(file-systems (append (keyboard-layout keyboard-layout)))
(list (file-systems
(file-system (cons*
(device (partition-label "EFI System Partition")) (file-system
(mount-point "/boot/efi") (device
(type "vfat")) (partition-label "EFI System Partition"))
(file-system (mount-point "/boot/efi")
(device (file-system-label "guix-root") (type "vfat"))
(mount-point "/") (file-system
(type "xfs"))) (device
(file-system (file-system-label "guix-root")
(device (label "swap")) (mount-point "/")
(type "swap"))) (type "xfs")))
%base-file-systems)) %base-file-systems))
(swap-devices (list (swap-devices
(swap-space (list
(target (label "swap")) (swap-space
(discard? #t)))) (target
(keyboard-layout (keyboard-layout "de")) (label "swap"))
(users (cons (user-account (discard? #t))))
(name "zilti") (keyboard-layout
(group "users") (keyboard-layout "de"))
(supplementary-groups '("wheel" (users
"seat" (cons* (user-account
"audio" (name "zilti")
"video" (group "users")
"libvirt"))) (supplementary-groups
%base-user-accounts)) '("wheel"
(packages (append "seat"
(list "audio"
nss-certs "video"
emacs "libvirt")))
emacs-desktop-environment %base-user-accounts))
kitty (packages
swayfx) (append
%base-packages)) (list
nss-certs
(services (append emacs
(modify-services emacs-desktop-environment
%desktop-services kitty
(delete login-service-type) swayfx)
(delete mingetty-service-type)) %base-packages))
(list (service avahi-service-type) (services
(append
(service elogind-service-type) (modify-services
(service seatd-service-type) %desktop-services
(service polkit-service-type) (delete login-service-type)
(service polkit-wheel-service) (delete mingetty-service-type))
(service upower-service-type) (list
(service tlp-service-type) (service network-manager-service-type)
(service thermald-service-type (service wpa-supplicant-service-type)
(thermald-configuration (service ntp-service-type)
(adaptive? #t))) (service gdm-service-type)
(service udisks-service-type) (service avahi-service-type)
(service bluetooth-service-type) (service elogind-service-type)
(service inputattach-service-type) (service seatd-service-type)
(service polkit-service-type)
(service fstrim-service-type) (service polkit-wheel-service)
(service upower-service-type)
(service earlyoom-service-type (service tlp-service-type)
(earlyoom-configuration (service thermald-service-type
(minimum-available-memory 5) (thermald-configuration
(minimum-free-swap 5))) (adaptive? #t)))
(service udisks-service-type)
(service greetd-service-type (service bluetooth-service-type)
(greetd-configuration (service inputattach-service-type)
(greeter-supplementary-groups (service fstrim-service-type)
(list "video" "input" "seat")) (service earlyoom-service-type
(terminals (earlyoom-configuration
(list (greetd-terminal-configuration (minimum-available-memory 5)
(terminal-vt "1") (minimum-free-swap 5)))
(terminal-switch #t) (service greetd-service-type
(default-session-command (greetd-configuration
(greetd-wlgreet-sway-session (greeter-supplementary-groups
(sway 'swayfx) (list "video" "input" "seat"))
;; (sway-configuration #f) (terminals
))))))) (list
(greetd-terminal-configuration
(service fprintd-service-type) (terminal-vt "1")
(terminal-switch #t)
(service screen-locker-service-type (default-session-command
(screen-locker-configuration (greetd-wlgreet-sway-session
(name "swaylock") (sway 'swayfx)
(program (file-append swaylock-effects "/bin/swaylock")) ;; (sway-configuration #f)
(using-setuid? #f))) )))))))
(service fprintd-service-type)
(service libvirt-service-type (service screen-locker-service-type
(libvirt-configuration (screen-locker-configuration
(unix-sock-group "libvirt")))))) (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)) (name-service-switch %mdns-host-lookup-nss))