From baca853691d5b01b83aeedfa3a9d7d723f796d17 Mon Sep 17 00:00:00 2001
From: Marcel Kapfer <opensource@mmk2410.org>
Date: Thu, 18 Nov 2021 18:51:49 +0100
Subject: [PATCH] [stumpwm] fix powerstate commands

---
 stumpwm/stumpwmrc | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/stumpwm/stumpwmrc b/stumpwm/stumpwmrc
index 8ff01e9..e732967 100644
--- a/stumpwm/stumpwmrc
+++ b/stumpwm/stumpwmrc
@@ -160,10 +160,10 @@
 ;; computer power state keys
 (defvar *powerstate-frame-bindings*
   (let ((m (make-sparse-keymap)))
-    (define-key m (kbd "M-s") "systemctl suspend")
-    (define-key m (kbd "M-p") "systemctl poweroff")
-    (define-key m (kbd "M-r") "systemctl reboot")
-    (define-key m (kbd "M-h") "systemctl hibernate")
+    (define-key m (kbd "M-s") "exec systemctl suspend")
+    (define-key m (kbd "M-p") "exec systemctl poweroff")
+    (define-key m (kbd "M-r") "exec systemctl reboot")
+    (define-key m (kbd "M-h") "exec systemctl hibernate")
     m))
 
 (define-key *root-map* (kbd "C-F12") '*powerstate-frame-bindings*)