home-environments: radio: Declare ~/.config/gtk-2.0 to be the Adwaita-dark's gtk-2.0 dir

home-environments/radio.scm

@@ -7,7 +7,8 @@
   #|H|# #:use-module (gnu home)
 
   #|GNU packages|#
-  #|G|# #:use-module (gnu packages gnupg)
+  #|G|# #:use-module (gnu packages gnome)
+        #:use-module (gnu packages gnupg)
   #|L|# #:use-module (gnu packages linux)
   #|S|# #:use-module (gnu packages shells)
 
@@ -86,7 +87,6 @@
                     (videos "$HOME/media/videos")
                     (publicshare "")
                     (templates "")))
-
           (service home-xdg-mime-applications-service-type
                    (home-xdg-mime-applications-configuration
                     (default (associate-right
@@ -97,6 +97,13 @@
                                                      mime-types:video))
                                ('imv.desktop mime-types:image)
                                ('sioyek.desktop mime-types:document)))))
+          (service home-xdg-configuration-files-service-type
+                   (let ((adwaita-theme
+                          (file-append gnome-themes-extra
+                                       "/share/themes/Adwaita-dark/gtk-2.0")))
+                     `(("gtk-2.0" ,adwaita-theme))))
+
+          #|Symlink services|#
           (service home-special-files-service-type
                    `((".config/guix/home.scm" ,radio.scm)))
 

home-environments/radio/files/.config/gtk-2.0/apps.rc

@@ -1,99 +0,0 @@
-# vim:set ft=gtkrc ts=2 sw=2 sts=2 ai et:
-#
-# This file, unlike hacks.rc, contains legitimate cases we need to handle, e.g.
-# custom widgets, programs giving us a chance to alter their UI to fit more with
-# the theme or stuff that is supposed to look different, like panels.
-
-# TODO: This could really look nicer
-style "gimp_spin_scale" {
-
-  # Spin background
-  bg[NORMAL] = @base_color
-
-  engine "pixmap" {
-
-    image {
-      function        = BOX
-      state           = NORMAL
-      detail          = "spinbutton_up"
-      overlay_file    = "assets/spin-up.png"
-      overlay_stretch = FALSE
-    }
-
-    image {
-      function        = BOX
-      state           = PRELIGHT
-      detail          = "spinbutton_up"
-      overlay_file    = "assets/spin-up.png"
-      overlay_stretch = FALSE
-    }
-
-    image {
-      function        = BOX
-      state           = ACTIVE
-      detail          = "spinbutton_up"
-      overlay_file    = "assets/spin-up.png"
-      overlay_stretch = FALSE
-    }
-
-    image {
-      function        = BOX
-      state           = INSENSITIVE
-      detail          = "spinbutton_up"
-      overlay_file    = "assets/spin-up-insensitive.png"
-      overlay_stretch = FALSE
-    }
-
-    image {
-      function        = BOX
-      state           = NORMAL
-      detail          = "spinbutton_down"
-      overlay_file    = "assets/spin-down.png"
-      overlay_stretch = FALSE
-    }
-
-    image {
-      function        = BOX
-      state           = PRELIGHT
-      detail          = "spinbutton_down"
-      overlay_file    = "assets/spin-down.png"
-      overlay_stretch = FALSE
-    }
-
-    image {
-      function        = BOX
-      state           = ACTIVE
-      detail          = "spinbutton_down"
-      overlay_file    = "assets/spin-down.png"
-      overlay_stretch = FALSE
-    }
-
-    image {
-      function        = BOX
-      state           = INSENSITIVE
-      detail          = "spinbutton_down"
-      overlay_file    = "assets/spin-down-insensitive.png"
-      overlay_stretch = FALSE
-    }
-
- }
-
-}
-
-style "chrome_gtk_frame" {
-
-  ChromeGtkFrame::frame-color          = @window_color
-  ChromeGtkFrame::frame-gradient-color = @window_color
-  ChromeGtkFrame::inactive-frame-color = @bg_color
-
-  ChromeGtkFrame::incognito-frame-color          = "#cbd2d9"
-  ChromeGtkFrame::incognito-frame-gradient-color = "#cbd2d9"
-  ChromeGtkFrame::incognito-inactive-frame-color = mix (0.5, @bg_color, "#cbd2d9")
-
-}
-
-# Disable spin button assets for GimpSpinScale
-class "GimpSpinScale" style "gimp_spin_scale"
-
-# Chromium lets us define some colours and settings for better integration
-class "ChromeGtkFrame" style "chrome_gtk_frame"