EXWM: Fix suspend-to-sleep.

.emacs.d/lisp/init-exwm.el

@@ -165,12 +165,9 @@
 
 (defun ambrevar/suspend-to-sleep ()
   (interactive)
+  (require 'recentf)
   (recentf-save-list)
-  (call-process "dbus-send" nil nil nil
-                "--system" "--print-reply" "--dest=org.freedesktop.login1"
-                "/org/freedesktop/login1"
-                "org.freedesktop.login1.Manager.Suspend"
-                "boolean:true"))
+  (call-process "loginctl" nil nil nil "suspend"))
 (exwm-input-set-key (kbd "s-Z") #'ambrevar/suspend-to-sleep)
 
 ;;; Volume control