| 1 | (use-modules (gnu) (gnu system nss)
|
|---|
| 2 | (srfi srfi-1))
|
|---|
| 3 |
|
|---|
| 4 | (use-service-modules xorg
|
|---|
| 5 | networking
|
|---|
| 6 | desktop
|
|---|
| 7 | databases
|
|---|
| 8 | web
|
|---|
| 9 | docker)
|
|---|
| 10 |
|
|---|
| 11 | (use-package-modules geo)
|
|---|
| 12 |
|
|---|
| 13 | (operating-system
|
|---|
| 14 | (host-name "Libreboot")
|
|---|
| 15 | (timezone "Europe/Moscow")
|
|---|
| 16 | (locale "ru_RU.utf8")
|
|---|
| 17 |
|
|---|
| 18 | (bootloader (bootloader-configuration
|
|---|
| 19 | (bootloader grub-bootloader)
|
|---|
| 20 | (target "/dev/sda")))
|
|---|
| 21 |
|
|---|
| 22 | (file-systems (cons* (file-system
|
|---|
| 23 | (device (file-system-label "root"))
|
|---|
| 24 | (mount-point "/")
|
|---|
| 25 | (type "ext4"))
|
|---|
| 26 | %base-file-systems))
|
|---|
| 27 |
|
|---|
| 28 | (users (cons (user-account
|
|---|
| 29 | (name "w96k")
|
|---|
| 30 | (group "users")
|
|---|
| 31 | (supplementary-groups '("wheel" "netdev"
|
|---|
| 32 | "audio" "video"
|
|---|
| 33 | "docker"))
|
|---|
| 34 | (home-directory "/home/w96k"))
|
|---|
| 35 | %base-user-accounts))
|
|---|
| 36 |
|
|---|
| 37 | (packages
|
|---|
| 38 | (append
|
|---|
| 39 | (map specification->package
|
|---|
| 40 | '(
|
|---|
| 41 | "ratpoison"
|
|---|
| 42 | "stumpwm"
|
|---|
| 43 | "i3-wm"
|
|---|
| 44 | "inputattach"
|
|---|
| 45 | "font-dejavu"
|
|---|
| 46 | "mailutils"
|
|---|
| 47 | "font-terminus"
|
|---|
| 48 | "emacs-no-x-toolkit"
|
|---|
| 49 | "fontconfig"
|
|---|
| 50 | "git"
|
|---|
| 51 | "htop"
|
|---|
| 52 | "netcat"
|
|---|
| 53 | "nss-certs"
|
|---|
| 54 | "openssh"
|
|---|
| 55 | "vim"
|
|---|
| 56 | "xinit"
|
|---|
| 57 | "xf86-video-intel"
|
|---|
| 58 | "x86-energy-perf-policy"
|
|---|
| 59 | "xterm"
|
|---|
| 60 | "xinit"
|
|---|
| 61 | "rxvt-unicode"
|
|---|
| 62 | "node"
|
|---|
| 63 | "ruby"
|
|---|
| 64 | "bundler"
|
|---|
| 65 | "docker"
|
|---|
| 66 | "docker-cli"
|
|---|
| 67 | "nix"
|
|---|
| 68 | "postgresql"
|
|---|
| 69 | "php"))
|
|---|
| 70 | %base-packages))
|
|---|
| 71 |
|
|---|
| 72 | ;; Use the "desktop" services, which include the X11
|
|---|
| 73 | ;; log-in service, networking with NetworkManager, and more.
|
|---|
| 74 |
|
|---|
| 75 | (services
|
|---|
| 76 | (cons*
|
|---|
| 77 | (service slim-service-type)
|
|---|
| 78 | (service inputattach-service-type
|
|---|
| 79 | (inputattach-configuration
|
|---|
| 80 | (device "/dev/ttyS4")
|
|---|
| 81 | (device-type "wacom")))
|
|---|
| 82 | (postgresql-service #:extension-packages (list postgis))
|
|---|
| 83 | (service docker-service-type)
|
|---|
| 84 | (service tor-service-type)
|
|---|
| 85 | (console-keymap-service "ru")
|
|---|
| 86 |
|
|---|
| 87 | (remove (lambda (service)
|
|---|
| 88 | (eq? (service-kind service) gdm-service-type))
|
|---|
| 89 | %desktop-services)))
|
|---|
| 90 |
|
|---|
| 91 | ;; Allow resolution of '.local' host names with mDNS.
|
|---|
| 92 | (name-service-switch %mdns-host-lookup-nss))
|
|---|
