X-Git-Url: https://ruderich.org/simon/gitweb/?a=blobdiff_plain;f=xmonad%2Fxmonad.hs;h=bdee75d1a9d31e8498a52386890b47e5796c07a0;hb=b71680c55e6e492ed008f8ec5af3bf169b272f09;hp=7ae8dbb2aeda9d658ed4a6553469202d72ee6365;hpb=3a3e803e9836ffcf97e93a79e0e7badc6ef47eff;p=config%2Fdotfiles.git

diff --git a/xmonad/xmonad.hs b/xmonad/xmonad.hs
index 7ae8dbb..bdee75d 100644
--- a/xmonad/xmonad.hs
+++ b/xmonad/xmonad.hs
@@ -36,7 +36,7 @@ import qualified XMonad.StackSet as W
 avoidMaster :: W.StackSet i l a s sd -> W.StackSet i l a s sd
 avoidMaster = W.modify' $ \c -> case c of
     W.Stack t [] (r:rs) -> W.Stack r [] (t:rs)
-    otherwise           -> c
+    _                   -> c
 
 -- Create my custom layout.
 --
@@ -151,11 +151,10 @@ myKeys = [
 
         -- Switch to last active workspace, thanks to moljac024 in #xmonad on
         -- Freenode (2010-12-18 14:45 CET).
-      , ((myModMask, xK_f), toggleWS)
+      , ((myModMask, xK_b), toggleWS)
 
-      -- Lock the screen. The sleep is necessary to allow xtrlock to grab the
-      -- keyboard input.
-      , ((myModMask, xK_z), spawn "sleep 1 && exec xtrlock")
+      -- Lock the screen.
+      , ((myModMask, xK_z), spawn "$HOME/.xlockscreen lock")
     ]
     ++
     -- When using multiple screens, switching to another workspace causes