a decent working guix config

guix/home-services/udiskie.scm

@@ -0,0 +1,32 @@
+(define-module (home-services udiskie)
+  #:use-module (gnu services)
+  #:use-module (gnu home services)
+  #:use-module (gnu home services shepherd)
+  #:use-module (gnu packages freedesktop)
+  #:use-module (gnu services configuration)
+  #:use-module (guix gexp)
+
+  #:export (home-udiskie-service-type))
+
+(define (home-udiskie-profile-service config)
+  (list udiskie))
+
+(define (home-udiskie-shepherd-service config)
+  (list
+   (shepherd-service
+    (provision '(udiskie))
+    (documentation "Run and control udiskie.")
+    (start #~(make-forkexec-constructor '("udiskie" "-t")))
+    (stop #~(make-kill-destructor)))))
+
+(define home-udiskie-service-type
+  (service-type (name 'home-udiskie)
+                (description "A service for launching Udiskie.")
+                (extensions
+                 (list (service-extension
+                        home-profile-service-type
+                        home-udiskie-profile-service)
+                       (service-extension
+                        home-shepherd-service-type
+                        home-udiskie-shepherd-service)))
+                (default-value #f)))