.

config.org

@@ -118,11 +118,12 @@ As a sibling to the former, the variable ~%local-swap~ does the same with the sw
      (delete login-service-type)
      (delete mingetty-service-type)
      (delete console-font-service-type))
-    (concat
     <<root-simple-service-block>>
-     <<greeter-service>>
-     <<screen-lock-service>>
-     )))
+    (list
+     <<greeter-service>>)
+    (list
+     <<screen-lock-service>>)
+    ))
 #+end_src
 
 *** Simple Services

config.scm

@@ -71,7 +71,6 @@
      (delete login-service-type)
      (delete mingetty-service-type)
      (delete console-font-service-type))
-    (concat
     (list
      (tlp-service-type
       (tlp-configuration))
@@ -94,6 +93,7 @@
      (fprintd-service-type
       (fprintd-configuration)))
     
+    (list
      (service greetd-service-type
               (greetd-configuration
                (greeter-supplementary-groups
@@ -108,12 +108,13 @@
                      (command
                       (file-append swayfx "/bin/sway")))))
                  (greetd-terminal-configuration
-                  (terminal-vt "8"))))))
+                  (terminal-vt "8")))))))
+    (list
      (service screen-locker-service-type
               (screen-locker-configuration
                (name "swaylock")
                (program
                 (file-append swaylock-effects "/bin/swaylock"))
-               (using-setuid? #f)))
-     )))
+               (using-setuid? #f))))
+    ))
  (name-service-switch %mdns-host-lookup-nss))