From 3967a01b898e52ec559e9be9328714d0ae43d33d Mon Sep 17 00:00:00 2001
From: Tom Willemse
Date: Thu, 22 Sep 2022 22:57:15 -0700
Subject: Set up initial configuration for rincewind home

---
 oni/home/data/config.scm | 93 ++----------------------------------------------
 1 file changed, 3 insertions(+), 90 deletions(-)

(limited to 'oni/home/data/config.scm')

diff --git a/oni/home/data/config.scm b/oni/home/data/config.scm
index a81bd1e..a4cc54d 100644
--- a/oni/home/data/config.scm
+++ b/oni/home/data/config.scm
@@ -26,6 +26,7 @@
   #:use-module (oni home services unclutter)
   #:use-module (oni home services dunst)
   #:use-module (oni home services guile)
+  #:use-module (oni home services environment)
   #:use-module (oni packages hlwm-run-or-raise)
   #:use-module (oni packages pick-random-wallpaper))
 
@@ -38,15 +39,8 @@
 
  (services
   (list
-   (simple-service 'some-useful-env-vars-service
-                   home-environment-variables-service-type
-                   `(("LESS" . "FXRSi")
-                     ("MY_GUIX_CONFIGURED" . "1")
-                     ("DOTNET_CLI_TELEMETRY_OPTOUT" . "1")
-                     ("EDITOR" . "emacsclient")
-                     ("CALIBRE_USE_DARK_PALETTE" . "1")
-                     ("GUIX_LOCPATH" . "$HOME/.guix-home/profile/lib/locale")
-                     ("XDG_DATA_DIRS" . "${XDG_DATA_DIRS}${XDG_DATA_DIRS:+:}/usr/local/share:/usr/share")))
+   home-environment-service
+   home-rofi-default-service
 
    (service home-redshift-service-type
             (home-redshift-configuration
@@ -88,88 +82,7 @@
    (service home-zsh-syntax-highlighting-service-type)
    (service home-zsh-autosuggestions-service-type)
 
-   (service home-rofi-service-type
-            (home-rofi-configuration
-             (config
-              '((kb-cancel . "Escape,Control+g")
-                (window-format . "{c}  {t}")))
-             (theme
-              '((* ((text-color . "#bfbfbf")
-                    (background-color . "#3f4242")
-                    (lightbg . "#5b6161")
-                    (red . "#a85454")
-                    (orange . "#faa41a")
-                    (blue . "#1f2c3f")
-
-                    (selected-normal-foreground . "@text-color")
-                    (normal-foreground . "@text-color")
-                    (alternate-normal-background . "@background-color")
-                    (selected-urgent-foreground . "@text-color")
-                    (urgent-foreground . "@text-color")
-                    (alternate-urgent-background . "@background-color")
-                    (active-foreground . "@text-color")
-                    (selected-active-foreground . "@text-color")
-                    (alternate-normal-foreground . "@text-color")
-                    (alternate-active-background . "@blue")
-                    (bordercolor . "@text-color")
-                    (normal-background . "@background-color")
-                    (selected-normal-background . "@blue")
-                    (separatorcolor . "@orange")
-                    (spacing . 2)
-                    (urgent-background . "@red")
-                    (alternate-urgent-foreground . "@text-color")
-                    (selected-urgent-background . "@red")
-                    (alternate-active-foreground . "@text-color")
-                    (selected-active-background . "@blue")
-                    (active-background . "@red")
 
-                    (font . "Fantasque Sans Mono 14")))
-                (window ((border . 0)
-                         (text-color . "@text-color")
-                         (background-color . "rgba(0, 0, 0, 0%)")
-                         (padding . 5)
-                         (text-color . "@bordercolor")
-                         (background-color . "@background-color")))
-                (mainbox ((border . 0)
-                          (padding . 0)))
-                (message ((border . "1px dash 0px 0px")
-                          (text-color . "@separatorcolor")
-                          (padding . "2px 0px 0px")))
-                (textbox ((text-color . "@text-color")))
-                (listview ((fixed-height . 0)
-                           (border . "2px 0px 0px")
-                           (padding . "2px 0px 0px")
-                           (text-color . "@separatorcolor")))
-                (element ((border . 0)
-                          (children "element-icon" "element-text")
-                          (spacing . "5px")))
-                (element.normal.normal ((text-color . "@normal-foreground")
-                                        (background-color . "@normal-background")))
-                (element.normal.urgent ((text-color . "@urgent-foreground")
-                                        (background-color . "@urgent-background")))
-                (element.normal.active ((text-color . "@active-foreground")
-                                        (background-color . "@active-background")))
-                (element.selected.urgent ((text-color . "@selected-urgent-foreground")
-                                          (background-color . "@selected-urgent-background")))
-                (element.selected.active ((text-color . "@selected-active-foreground")
-                                          (background-color . "@selected-active-foreground")))
-                (element.alternate.normal ((text-color . "@alternate-normal-foreground")
-                                           (background-color . "@alternate-normal-background")))
-                (element.alternate.urgent ((text-color . "@alternate-urgent-foreground")
-                                           (background-color . "@alternate-urgent-background")))
-                (element.alternate.active ((text-color . "@alternate-active-foreground")
-                                           (background-color . "@alternate-active-background")))
-                (mode-switcher ((border . "1px dash 0px 0px")))
-                (#{button selected}# ((text-color . "@selected-normal-foreground")
-                                      (background-color . "@selected-normal-background")))
-                (inputbar ((spacing . 0)
-                           (border . "0px")
-                           (children "prompt" "textbox-prompt-colon" "entry" "case-indicator")))
-                (#{button normal}# ((text-color . "@text-color")))
-                (text-prompt-color ((expand . #f)
-                                    (str . ":")
-                                    (margin . "0px 0.3em 0em 0em")
-                                    (text-color . "@normal-foreground")))))))
 
    (service home-xmodmap-service-type
             (home-xmodmap-configuration
-- 
cgit v1.2.3-54-g00ecf