Replace deprecated functions with service-types

1 files changed, 4 insertions, 2 deletions

diff --git a/tw/system/lap.scm b/tw/system/lap.scm
index efbe19f7..9a1b8571 100644
--- a/tw/system/lap.scm
+++ b/tw/system/lap.scm
@@ -291,7 +291,7 @@ support extra features (acr, pmu, gr).")
          (extensions
           (list cups-filters foomatic-filters brlaser))))
 
-      (bluetooth-service)
+      (service bluetooth-service-type)
 
       (service tw-wireguard-service-type
         (tw-wireguard-configuration
@@ -324,7 +324,9 @@ support extra features (acr, pmu, gr).")
       ;; (service fprintd-service-type)
 
       ;; Install i3lock as a setuid binary, so it can talk to PAM.
-      (screen-locker-service i3lock "i3lock")
+      (service screen-locker-service-type
+        (screen-locker-configuration
+         "i3lock" (file-append i3lock "/bin/i3lock") #f))
 
       ;; gnome-keyring is not in `%desktop-services' by default,
       ;; but needs to be there to add itself to /etc/pam.d/.