From bf3c79332de9c138337485cd227dad5dd6801da0 Mon Sep 17 00:00:00 2001
From: Adrian Kummerlaender
Date: Thu, 15 Nov 2018 20:14:15 +0100
Subject: Add suspend, hibernate keybindings to XMonad

---
 gui/conf/xmonad.hs | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'gui/conf/xmonad.hs')

diff --git a/gui/conf/xmonad.hs b/gui/conf/xmonad.hs
index 1492739..dacc90a 100644
--- a/gui/conf/xmonad.hs
+++ b/gui/conf/xmonad.hs
@@ -182,7 +182,9 @@ commonKeybindings host =
 -- system control
   , ("M-c <Up>"      , spawn "amixer sset Master 10%+")
   , ("M-c <Down>"    , spawn "amixer sset Master 10%-")
-  , ("M-c m"         , spawn "amixer sset Master toggle") ]
+  , ("M-c m"         , spawn "amixer sset Master toggle")
+  , ("M-c s"         , spawn "systemctl suspend")
+  , ("M-c h"         , spawn "systemctl hibernate") ]
 
 customKeybindings host = concatMap ($ host) [commonKeybindings, hostSpecificKeybindings]
 
-- 
cgit v1.2.3