hosts/kirsty: use swaylock service

hosts/kirsty/system.scm

@@ -14,7 +14,8 @@
   #:use-module (gnu system locale)
   #:use-module (gnu system setuid)
   #:use-module (nongnu packages linux)
-  #:use-module (nongnu system linux-initrd))
+  #:use-module (nongnu system linux-initrd)
+  #:use-module (services swaylock))
 
 (define host-dir (dirname (module-filename (current-module))))
 
@@ -72,12 +73,6 @@
   (packages
    (cons* ncurses nss-certs rsync %base-packages))
 
-  (setuid-programs
-   (cons*
-    (setuid-program
-     (program (file-append swaylock "/bin/swaylock")))
-    %setuid-programs))
-
   (services
    (cons*
     (extra-special-file "/usr/bin/env" (file-append coreutils "/bin/env"))
@@ -98,6 +93,7 @@
     (service upower-service-type)
     (service alsa-service-type)
     (service pcscd-service-type)
+    (service swaylock-service-type)
 
     (service qemu-binfmt-service-type
              (qemu-binfmt-configuration