operating-systems: buer: Remove unnecessary comments

home-environments/radio.scm

@@ -147,8 +147,7 @@
           (service home-shepherd-service-type
                    (home-shepherd-configuration
                      (shepherd (@ (shepherd-package) shepherd))
-                     (services (list shepherd-service:repl
+                     (services (list shepherd-service:timer
-                                     shepherd-service:timer
                                      shepherd-service:wake-up))))
 
           #|Shell services|#

home-environments/radio/shepherd-services.scm

@@ -3,21 +3,7 @@
   #:use-module (gnu services shepherd)
   #:use-module (shepherd service timer)
 
-  #:export (repl timer wake-up))
+  #:export (wake-up timer))
-
-#|Repl|#
-(define repl
-  (shepherd-service
-    (provision '(repl))
-    (modules '((shepherd service repl)))
-    (free-form #~(repl-service))))
-
-#|Timers|#
-(define timer
-  (shepherd-service
-    (provision '(timer))
-    (modules '((shepherd service timer)))
-    (free-form #~(timer-service))))
 
 (define timer-trigger-action
   (shepherd-action
@@ -38,3 +24,8 @@ next calendar event.")))
     (stop #~(make-timer-destructor))
     (actions (list timer-trigger-action))))
 
+(define timer
+  (shepherd-service
+    (provision '(timer))
+    (modules '((shepherd service timer)))
+    (free-form #~(timer-service))))

operating-systems/buer/rules.scm

@@ -35,10 +35,6 @@
                          (command "herd")
                          (args (list action))))
                `("status" "detailed-status"))
-          (list (permit (identity ":wheel")
-                         (nopass? #t)
-                         (command "herd")
-                         (args (list "trigger" "snapshot-@home"))))
           (flat-map (lambda (service action)
                       (permit (identity ":wheel")
                               (nopass? #t)

operating-systems/buer/shepherd-services.scm

@@ -1,19 +1,10 @@
 (define-module (buer shepherd-services)
   #:use-module (guix gexp)
   #:use-module (gnu services shepherd)
-  #:use-module (shepherd service repl)
   #:use-module (shepherd service timer)
 
-  #:export (guix-gc snapshot-@home repl timer))
+  #:export (guix-gc snapshot-@home timer))
 
-#|Repl|#
-(define repl
-  (shepherd-service
-    (provision '(repl))
-    (modules '((shepherd service repl)))
-    (free-form #~(repl-service))))
-
-#|Timers|#
 (define timer-trigger-action
   (shepherd-action
     (name 'trigger)