diff --git a/buer.scm b/buer.scm
index 11581f9..f342d22 100644
--- a/buer.scm
+++ b/buer.scm
@@ -262,11 +262,11 @@
                                        (args '())))
                              `("zzz" "halt" "reboot")))
         (simple-service 'shepherd-status-permissions doas-service-type
-                        (map (lambda (arglist)
+                        (map (lambda (argument)
                                (permit (identity ":wheel")
                                        (nopass? #t)
                                        (command "herd")
-                                       (args (list arg))))
+                                       (args (list argument))))
                              `("status" "detailed-status")))
         (simple-service 'service-management-permissions doas-service-type
                         (flatmap (lambda (service action)