From 765f0be595996f38b5085dd8f864b5d32da25dc2 Mon Sep 17 00:00:00 2001
From: Rutherther <rutherther@protonmail.com>
Date: Sun, 18 Aug 2024 19:49:51 +0200
Subject: [PATCH] feat: add gammastep service, config

---
 home/dotfiles/gammastep.ini              | 8 ++++++++
 home/home-configuration.scm              | 4 ++++
 home/modules/ruther/home/dwl/scripts.scm | 2 ++
 3 files changed, 14 insertions(+)
 create mode 100644 home/dotfiles/gammastep.ini

diff --git a/home/dotfiles/gammastep.ini b/home/dotfiles/gammastep.ini
new file mode 100644
index 0000000..fdef213
--- /dev/null
+++ b/home/dotfiles/gammastep.ini
@@ -0,0 +1,8 @@
+[general]
+location-provider=manual
+temp-day=5500
+temp-night=3000
+
+[manual]
+lat=50.233293
+lon=14.322593
diff --git a/home/home-configuration.scm b/home/home-configuration.scm
index ca27c9a..a11fba6 100644
--- a/home/home-configuration.scm
+++ b/home/home-configuration.scm
@@ -124,6 +124,8 @@
 
                     (".config/dwl/scripts/print.sh" ,(local-file "dotfiles/dwl/print.sh"))
 
+                    (".config/gammastep/config.ini" ,(local-file "dotfiles/gammastep.ini"))
+
                     (".config/zsh/direnv/direnv" ,direnv)
                     (".config/zsh/plugins" ,#~(string-append #$(directory-union
                                                                 "zsh-plugins"
@@ -200,3 +202,5 @@
 ;; dwl package the scripts for starting, make them in Guile
 
 ;; xdg desktop portal, wlr
+
+;; redshift equivalent
diff --git a/home/modules/ruther/home/dwl/scripts.scm b/home/modules/ruther/home/dwl/scripts.scm
index 5beb3ff..2b22595 100644
--- a/home/modules/ruther/home/dwl/scripts.scm
+++ b/home/modules/ruther/home/dwl/scripts.scm
@@ -4,6 +4,7 @@
   #:use-module (guix packages)
   #:use-module (ruther packages wayland)
   #:use-module (gnu packages glib)
+  #:use-module (gnu packages xdisorg)
   #:use-module (gnu packages wm)
   #:use-module (gnu packages emacs)
   #:use-module (gnu packages networking)
@@ -192,6 +193,7 @@
                "XDG_CURRENT_DESKTOP"
                "DISPLAY"))
       (spawn (string-append #$network-manager-applet "/bin/nm-applet") '("nm-applet"))
+      (spawn (string-append #$gammastep "/bin/gammastep") '("gammastep"))
       (spawn (string-append #$blueman "/bin/blueman-applet") '("blueman-applet"))
       (spawn (string-append #$emacs-pgtk "/bin/emacs") '("emacs" "--daemon"))
       (spawn (string-append #$waybar "/bin/waybar") '("waybar"))
-- 
2.48.1