2022-09-23 07:57:15 +02:00
|
|
|
(define-module (oni home data config)
|
|
|
|
|
#:use-module (gnu home)
|
|
|
|
|
#:use-module (gnu home services)
|
|
|
|
|
#:use-module (gnu home services guix)
|
2022-09-27 01:05:48 +02:00
|
|
|
#:use-module (gnu packages)
|
2022-09-23 07:57:15 +02:00
|
|
|
#:use-module (gnu packages video)
|
|
|
|
|
#:use-module (gnu packages music)
|
2022-09-27 01:05:48 +02:00
|
|
|
#:use-module (gnu packages emacs)
|
|
|
|
|
#:use-module (gnu packages commencement)
|
2022-09-23 07:57:15 +02:00
|
|
|
#:use-module (gnu services)
|
|
|
|
|
#:use-module (guix packages)
|
|
|
|
|
#:use-module (guix gexp)
|
|
|
|
|
#:use-module (guix store)
|
|
|
|
|
#:use-module (guix derivations)
|
|
|
|
|
#:use-module (guix channels)
|
2022-09-27 01:05:48 +02:00
|
|
|
#:use-module (guix transformations)
|
2022-09-23 07:57:15 +02:00
|
|
|
#:use-module (oni home services environment)
|
2022-09-27 01:05:48 +02:00
|
|
|
#:use-module (oni home services rofi)
|
|
|
|
|
#:use-module (oni home services polybar)
|
|
|
|
|
#:use-module (oni home services dunst)
|
|
|
|
|
#:use-module (oni home services zsh)
|
|
|
|
|
#:use-module (oni home services kdeconnect)
|
|
|
|
|
#:use-module (oni home services syncthing)
|
|
|
|
|
#:use-module (oni packages hlwm-run-or-raise)
|
|
|
|
|
#:use-module (oni packages pick-random-wallpaper)
|
|
|
|
|
#:use-module (oni packages notmuch-collect-tasks)
|
|
|
|
|
#:use-module (oni packages notmuch-tag-mailinglists)
|
|
|
|
|
#:use-module (oni packages inbox-size)
|
|
|
|
|
#:use-module (oni packages count-emails)
|
|
|
|
|
#:use-module (oni home common config))
|
|
|
|
|
|
|
|
|
|
(define (with-master-branch package)
|
|
|
|
|
"Apply a transformation to PACKAGE so that it uses the master branch."
|
|
|
|
|
((options->transformation
|
|
|
|
|
`((with-branch . ,(string-append (package-name package) "=master"))))
|
|
|
|
|
package))
|
2022-09-23 07:57:15 +02:00
|
|
|
|
|
|
|
|
(home-environment
|
2022-09-27 01:05:48 +02:00
|
|
|
(packages (list mpv mpv-mpris easytag emacs-next
|
|
|
|
|
(specification->package+output "glibc-locales")
|
|
|
|
|
(specification->package+output "font-fantasque-sans")
|
|
|
|
|
(specification->package+output "font-comic-neue")
|
|
|
|
|
hlwm-run-or-raise
|
|
|
|
|
pick-random-wallpaper
|
|
|
|
|
gcc-toolchain ;Needed for emacs-next?
|
|
|
|
|
notmuch-collect-tasks
|
|
|
|
|
notmuch-tag-mailinglists
|
|
|
|
|
(inbox-size emacs-next)
|
|
|
|
|
count-emails))
|
2022-09-23 07:57:15 +02:00
|
|
|
|
|
|
|
|
(services
|
|
|
|
|
(list
|
|
|
|
|
home-environment-service
|
|
|
|
|
home-rofi-default-service
|
2022-09-27 01:05:48 +02:00
|
|
|
home-dunst-default-service
|
|
|
|
|
home-redshift-service
|
|
|
|
|
home-xbindkeys-service
|
|
|
|
|
home-zsh-service
|
|
|
|
|
home-guile-service
|
|
|
|
|
home-xmodmap-service
|
|
|
|
|
home-openssh-service
|
|
|
|
|
home-kitty-service
|
|
|
|
|
|
|
|
|
|
;; This has to be the first extension because it needs to be added to the
|
|
|
|
|
;; configuration last.
|
|
|
|
|
(service home-zsh-syntax-highlighting-service-type)
|
|
|
|
|
(service home-zsh-autosuggestions-service-type)
|
2022-09-23 07:57:15 +02:00
|
|
|
|
|
|
|
|
(simple-service 'my-channel-service
|
|
|
|
|
home-channels-service-type
|
|
|
|
|
(list
|
|
|
|
|
(channel
|
|
|
|
|
(name 'oni)
|
|
|
|
|
(url "https://git.sr.ht/~ryuslash/guix-packages")
|
|
|
|
|
(introduction
|
|
|
|
|
(make-channel-introduction
|
|
|
|
|
"646573578b7adfbff415645fed201269076cebf6"
|
|
|
|
|
(openpgp-fingerprint
|
|
|
|
|
"061C C5C4 D936 C9A8 AECC 1A17 7D5C 407B 4350 25C1"))))
|
|
|
|
|
(channel
|
|
|
|
|
(name 'guix-gaming-games)
|
|
|
|
|
(url "https://gitlab.com/guix-gaming-channels/games.git")
|
|
|
|
|
(introduction
|
|
|
|
|
(make-channel-introduction
|
|
|
|
|
"c23d64f1b8cc086659f8781b27ab6c7314c5cca5"
|
|
|
|
|
(openpgp-fingerprint
|
2022-09-27 01:05:48 +02:00
|
|
|
"50F3 3E2E 5B0C 3D90 0424 ABE8 9BDC F497 A4BB CC7F"))))))
|
|
|
|
|
|
|
|
|
|
(service home-polybar-service-type
|
|
|
|
|
(home-polybar-configuration
|
|
|
|
|
(bar "rincewind")))
|
|
|
|
|
|
|
|
|
|
(service home-kdeconnect-service-type)
|
|
|
|
|
(service home-syncthing-service-type))))
|
