1 files changed, 107 insertions, 0 deletions
diff --git a/oni/home/config/rincewind.scm b/oni/home/config/rincewind.scm
new file mode 100644
index 0000000..be107da
--- /dev/null
+++ b/oni/home/config/rincewind.scm
@@ -0,0 +1,107 @@
+(define-module (oni home config rincewind)
+  #:use-module (gnu home services guix)
+  #:use-module (gnu home services)
+  #:use-module (gnu home)
+  #:use-module (gnu packages commencement)
+  #:use-module (gnu packages emacs)
+  #:use-module (gnu packages emacs-xyz)
+  #:use-module (gnu packages linux)
+  #:use-module (gnu packages music)
+  #:use-module (gnu packages video)
+  #:use-module (gnu packages)
+  #:use-module (gnu services)
+  #:use-module (guix channels)
+  #:use-module (guix derivations)
+  #:use-module (guix gexp)
+  #:use-module (guix packages)
+  #:use-module (guix store)
+  #:use-module (guix transformations)
+  #:use-module (oni home config common)
+  #:use-module (oni home services dunst)
+  #:use-module (oni home services emacs)
+  #:use-module (oni home services environment)
+  #:use-module (oni home services flameshot)
+  #:use-module (oni home services kdeconnect)
+  #:use-module (oni home services polybar)
+  #:use-module (oni home services rofi)
+  #:use-module (oni home services syncthing)
+  #:use-module (oni home services zsh)
+  #:use-module (oni packages count-emails)
+  #:use-module (oni packages hlwm-run-or-raise)
+  #:use-module (oni packages inbox-size)
+  #:use-module (oni packages notmuch-collect-tasks)
+  #:use-module (oni packages notmuch-tag-mailinglists)
+  #:use-module (oni packages pick-random-wallpaper))
+
+(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))
+
+(home-environment
+ (packages (list mpv mpv-mpris easytag
+                 (specification->package+output "glibc-locales")
+                 (specification->package+output "font-fantasque-sans")
+                 (specification->package+output "font-comic-neue")
+                 hlwm-run-or-raise
+                 pick-random-wallpaper
+                 notmuch-collect-tasks
+                 notmuch-tag-mailinglists
+                 (inbox-size emacs-next)
+                 count-emails
+                 emacs-org-roam
+                 emacs-vterm
+                 fakeroot               ; Needed for build arch packages
+                 ))
+
+ (services
+  (list
+   home-environment-service
+   home-rofi-default-service
+   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)
+
+   (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
+                        "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)
+
+   (service home-emacs-service-type
+            (home-emacs-configuration
+             (package emacs-next)))
+
+   (service home-flameshot-service-type))))