home: services: Add guix-channels service.

home/config.scm

@@ -2,6 +2,7 @@
  (gnu)
  (gnu home)
  (gnu home services)
+ (gnu home services guix)
  (gnu home services shells)
  (gnu home services shepherd)
  (gnu packages)
@@ -22,6 +23,7 @@
  (gnu packages libreoffice)
  (gnu packages linphone)
  (gnu packages lxde)
+ (gnu packages lxqt)
  (gnu packages mail)
  (gnu packages messaging)
  (gnu packages networking)
@@ -35,6 +37,7 @@
  (gnu packages video)
  (gnu packages web-browsers)
  (gnu services)
+ (guix channels)
  (guix gexp))
 
 (home-environment
@@ -77,8 +80,8 @@
    (list
     gnupg
     gpa
-    pinentry
-    polkit-gnome)
+    lxqt-policykit
+    pinentry)
    ;; Utilities
    (list
     blueman
@@ -106,6 +109,27 @@
 		 (string-append (getenv "HOME")
 				"/dotfiles/bash/bash_profile")
 		 "bash_profile"))))))
+   ;; Channels
+   (list
+    (simple-service 'guix-channels
+                    home-channels-service-type
+                    (list
+                     (channel
+                      (name 'nonguix)
+                      (url "https://gitlab.com/nonguix/nonguix")
+                      (introduction
+                       (make-channel-introduction
+                        "897c1a470da759236cc11798f4e0a5f7d4d59fbc"
+                       (openpgp-fingerprint
+                        "2A39 3FFF 68F4 EF7A 3D29  12AF 6F51 20A0 22FB B2D5"))))
+                     (channel
+                      (name 'rg)
+                      (url "https://git.sr.ht/~raghavgururajan/guix-channel")
+                      (introduction
+                       (make-channel-introduction
+                        "b56a4dabe12bfb1eed80467f48d389b32137cb60"
+                       (openpgp-fingerprint
+                        "CD2D 5EAA A98C CB37 DA91  D6B0 5F58 1664 7F8B E551")))))))
    ;; Files
    (list
     (simple-service 'emacs-config
@@ -268,8 +292,8 @@
 		 (stop #~(make-system-destructor "gpg-connect-agent killagent /bye")))
 		(shepherd-service
 		 (provision '(polkit-agent))
-		 (start #~(make-system-constructor "$HOME/.guix-home/profile/libexec/polkit-gnome-authentication-agent-1 &"))
-		 (stop #~(make-system-destructor "pkill -9 polkit-gnome-authentication-agent-1")))
+		 (start #~(make-system-constructor "lxqt-policykit-agent &"))
+		 (stop #~(make-system-destructor "pkill -9 lxqt-policykit-agent")))
 		(shepherd-service
 		 (provision '(udiskie))
 		 (start #~(make-system-constructor "udiskie &"))