77 lines
2.1 KiB
Scheme
77 lines
2.1 KiB
Scheme
(use-modules
|
|
(gnu)
|
|
(gnu packages shells)
|
|
(guix profiles)
|
|
(guix packages)
|
|
(srfi srfi-1))
|
|
(use-service-modules desktop docker networking ssh xorg)
|
|
|
|
(define (manifest->packages manifest)
|
|
"Return the list of packages in MANIFEST."
|
|
(filter-map (lambda (entry)
|
|
(let ((item (manifest-entry-item entry)))
|
|
(if (package? item) item #f)))
|
|
(manifest-entries manifest)))
|
|
|
|
(operating-system
|
|
(locale "en_CA.utf8")
|
|
(timezone "America/Toronto")
|
|
(keyboard-layout
|
|
(keyboard-layout "us" "altgr-intl"))
|
|
(bootloader
|
|
(bootloader-configuration
|
|
(bootloader grub-efi-bootloader)
|
|
(target "/boot/efi")
|
|
(keyboard-layout keyboard-layout)))
|
|
(mapped-devices
|
|
(list (mapped-device
|
|
(source
|
|
(uuid "a3557b80-26cb-4fa9-8861-3dba1f6b1aa2"))
|
|
(target "cryptroot")
|
|
(type luks-device-mapping))))
|
|
(file-systems
|
|
(cons* (file-system
|
|
(mount-point "/boot/efi")
|
|
(device (uuid "76BA-85FB" 'fat32))
|
|
(type "vfat"))
|
|
(file-system
|
|
(mount-point "/")
|
|
(device "/dev/mapper/cryptroot")
|
|
(type "ext4")
|
|
(dependencies mapped-devices))
|
|
%base-file-systems))
|
|
(host-name "guixsd")
|
|
(users (cons* (user-account
|
|
(name "collin")
|
|
(comment "Collin Doering")
|
|
(group "users")
|
|
(shell #~(string-append #$zsh "/bin/zsh"))
|
|
(home-directory "/home/collin")
|
|
(supplementary-groups
|
|
'("wheel" "docker" "netdev" "audio" "video")))
|
|
%base-user-accounts))
|
|
|
|
(packages
|
|
(append
|
|
(manifest->packages
|
|
(specifications->manifest
|
|
'("docker"
|
|
"docker-cli"
|
|
"docker-compose"
|
|
"ratpoison"
|
|
"nss-certs"
|
|
"xterm"
|
|
"recutils"
|
|
"emacs"
|
|
"emacs-guix"
|
|
"emacs-exwm"
|
|
"graphviz"
|
|
"tmux"
|
|
"xterm"
|
|
"xrandr"
|
|
"xsetroot")))
|
|
%base-packages))
|
|
|
|
(services (cons* (service docker-service-type)
|
|
%desktop-services)))
|