2023-11-28 21:38:47 +00:00
|
|
|
;; -*- mode: guix-scheme -*-
|
|
|
|
|
|
2023-11-28 22:38:08 +00:00
|
|
|
(use-modules
|
|
|
|
|
(gnu)
|
2023-11-29 12:43:06 +00:00
|
|
|
(gnu image)
|
2023-11-29 13:30:07 +00:00
|
|
|
(gnu services authentication)
|
2023-11-28 22:38:08 +00:00
|
|
|
(gnu services avahi)
|
|
|
|
|
(gnu services base)
|
2023-11-29 13:26:42 +00:00
|
|
|
(gnu services dbus)
|
2023-11-29 13:23:45 +00:00
|
|
|
(gnu services desktop)
|
2023-11-29 13:29:39 +00:00
|
|
|
(gnu services linux)
|
2023-11-28 22:38:08 +00:00
|
|
|
(gnu services networking)
|
|
|
|
|
(gnu services pm)
|
2023-11-29 13:30:36 +00:00
|
|
|
(gnu services virtualization)
|
2023-11-29 13:23:45 +00:00
|
|
|
(gnu services xorg)
|
2023-11-28 22:38:08 +00:00
|
|
|
(gnu system nss))
|
2023-11-28 21:38:47 +00:00
|
|
|
|
2023-11-29 13:22:51 +00:00
|
|
|
(use-service-modules desktop
|
|
|
|
|
xorg)
|
2023-11-28 21:38:47 +00:00
|
|
|
|
|
|
|
|
(use-package-modules bootloaders
|
|
|
|
|
certs
|
|
|
|
|
emacs
|
2023-11-29 12:47:06 +00:00
|
|
|
emacs-xyz
|
2023-11-29 13:44:20 +00:00
|
|
|
fonts
|
2023-11-30 14:33:05 +00:00
|
|
|
readline
|
2023-11-29 12:47:22 +00:00
|
|
|
terminals
|
2023-11-30 14:33:26 +00:00
|
|
|
version-control
|
2023-11-28 21:38:47 +00:00
|
|
|
wm
|
2023-11-29 12:01:54 +00:00
|
|
|
xorg)
|
2023-11-28 21:38:47 +00:00
|
|
|
|
2023-11-30 12:34:55 +00:00
|
|
|
(define %local-filesystem
|
|
|
|
|
(call-with-input-file "/etc/config.scm"
|
|
|
|
|
(lambda (port)
|
|
|
|
|
(read port)
|
|
|
|
|
(read port)
|
2023-11-30 12:39:17 +00:00
|
|
|
(eval (cadar (last-pair (read port)))
|
|
|
|
|
(interaction-environment)))))
|
2023-11-30 12:34:55 +00:00
|
|
|
|
2023-11-28 21:38:47 +00:00
|
|
|
(operating-system
|
|
|
|
|
(host-name "ziltis-machine")
|
|
|
|
|
(timezone "Europe/Berlin")
|
|
|
|
|
(locale "de_DE.utf8")
|
2023-11-29 13:08:49 +00:00
|
|
|
(keyboard-layout
|
2023-11-30 10:28:09 +00:00
|
|
|
(keyboard-layout "de" #:options
|
|
|
|
|
'("caps:swapescape")))
|
2023-11-28 22:38:08 +00:00
|
|
|
(bootloader
|
|
|
|
|
(bootloader-configuration
|
|
|
|
|
(bootloader grub-efi-bootloader)
|
|
|
|
|
(targets
|
|
|
|
|
'("/boot/efi"))
|
|
|
|
|
(keyboard-layout keyboard-layout)))
|
2023-11-30 12:34:55 +00:00
|
|
|
(file-systems %local-filesystem)
|
2023-11-28 22:38:08 +00:00
|
|
|
(swap-devices
|
|
|
|
|
(list
|
|
|
|
|
(swap-space
|
2023-11-30 10:48:42 +00:00
|
|
|
(target "/dev/disk/by-partlabel/swap")
|
2023-11-28 22:38:08 +00:00
|
|
|
(discard? #t))))
|
|
|
|
|
(users
|
2023-11-29 12:01:54 +00:00
|
|
|
(cons*
|
|
|
|
|
(user-account
|
|
|
|
|
(name "zilti")
|
|
|
|
|
(group "users")
|
|
|
|
|
(supplementary-groups
|
|
|
|
|
'("wheel"
|
2023-11-29 12:42:36 +00:00
|
|
|
"netdev"
|
2023-11-29 12:01:54 +00:00
|
|
|
"audio"
|
|
|
|
|
"video"
|
|
|
|
|
"libvirt")))
|
2023-11-28 22:38:08 +00:00
|
|
|
%base-user-accounts))
|
|
|
|
|
(packages
|
|
|
|
|
(append
|
2023-11-30 14:31:53 +00:00
|
|
|
(list
|
|
|
|
|
nss-certs
|
|
|
|
|
readline
|
|
|
|
|
emacs
|
|
|
|
|
emacs-desktop-environment
|
|
|
|
|
font-terminus
|
|
|
|
|
git
|
|
|
|
|
kitty
|
|
|
|
|
swayfx)
|
2023-11-28 22:38:08 +00:00
|
|
|
%base-packages))
|
|
|
|
|
(services
|
|
|
|
|
(append
|
|
|
|
|
(modify-services
|
|
|
|
|
%desktop-services
|
2023-11-30 16:21:25 +00:00
|
|
|
(delete login-service-type)
|
2023-11-30 11:18:13 +00:00
|
|
|
(delete mingetty-service-type)
|
2023-11-29 14:36:31 +00:00
|
|
|
(delete console-font-service-type))
|
2023-11-28 22:38:08 +00:00
|
|
|
(list
|
|
|
|
|
(service tlp-service-type)
|
|
|
|
|
(service thermald-service-type
|
|
|
|
|
(thermald-configuration
|
|
|
|
|
(adaptive? #t)))
|
|
|
|
|
(service bluetooth-service-type)
|
|
|
|
|
(service inputattach-service-type)
|
2023-11-29 13:37:26 +00:00
|
|
|
(service fstrim-service-type)
|
2023-11-28 22:38:08 +00:00
|
|
|
(service earlyoom-service-type
|
|
|
|
|
(earlyoom-configuration
|
|
|
|
|
(minimum-available-memory 5)
|
|
|
|
|
(minimum-free-swap 5)))
|
2023-11-29 14:36:31 +00:00
|
|
|
(service greetd-service-type
|
2023-11-28 22:38:08 +00:00
|
|
|
(greetd-configuration
|
|
|
|
|
(greeter-supplementary-groups
|
2023-11-29 13:55:55 +00:00
|
|
|
(list "video" "input"))
|
2023-11-28 22:38:08 +00:00
|
|
|
(terminals
|
|
|
|
|
(list
|
2023-11-30 12:22:14 +00:00
|
|
|
(greetd-terminal-configuration
|
2023-11-30 16:20:39 +00:00
|
|
|
(terminal-switch #t)
|
2023-11-30 12:22:14 +00:00
|
|
|
(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"))
|
2023-11-30 16:13:56 +00:00
|
|
|
#;(greetd-terminal-configuration
|
2023-11-29 19:47:22 +00:00
|
|
|
(terminal-vt "7")
|
2023-11-28 22:38:08 +00:00
|
|
|
(terminal-switch #t)
|
|
|
|
|
(default-session-command
|
2023-11-30 15:41:40 +00:00
|
|
|
(greetd-wlgreet-session
|
|
|
|
|
(command
|
2023-11-30 15:43:29 +00:00
|
|
|
(file-append swayfx "/bin/sway")))
|
2023-11-30 15:41:40 +00:00
|
|
|
#;(greetd-wlgreet-sway-session
|
2023-11-30 15:32:50 +00:00
|
|
|
(sway (specification->package "swayfx")))))))))
|
2023-11-28 22:38:08 +00:00
|
|
|
(service fprintd-service-type)
|
|
|
|
|
(service screen-locker-service-type
|
|
|
|
|
(screen-locker-configuration
|
|
|
|
|
(name "swaylock")
|
2023-11-30 14:36:07 +00:00
|
|
|
(program
|
|
|
|
|
(file-append swaylock-effects "/bin/swaylock"))
|
2023-11-28 22:38:08 +00:00
|
|
|
(using-setuid? #f)))
|
|
|
|
|
(service libvirt-service-type
|
|
|
|
|
(libvirt-configuration
|
|
|
|
|
(unix-sock-group "libvirt"))))))
|
2023-11-28 21:38:47 +00:00
|
|
|
(name-service-switch %mdns-host-lookup-nss))
|
