diff --git a/buer.scm b/buer.scm
index 0118fa1..3cd2d9b 100644
--- a/buer.scm
+++ b/buer.scm
@@ -274,9 +274,9 @@
                                     (permit (identity ":wheel")
                                             (nopass? #t)
                                             (command "herd")
-                                            (args (cons action service))))
-                                  `(("tlp") ("tor") ("thermald")
-                                    ("thinkfan") ("wpa-supplicant"))
+                                            (args (list action service))))
+                                  `("tlp" "tor" "thermald" "thinkfan"
+                                    "wpa-supplicant")
                                   `("doc" "stop" "start" "enable"
                                     "status" "restart" "disable"))))