bash: improve SSH_AUTH_SOCK detection

[dotfiles] / .xmonad / xmonad.hs

diff --git a/.xmonad/xmonad.hs b/.xmonad/xmonad.hs
index c1bd4510de812c97df3a55904208d9eaa34eb56f..bf5ae5ae9bb448c18ba06540e196b9c35bde0f71 100644 (file)
--- a/.xmonad/xmonad.hs
+++ b/.xmonad/xmonad.hs
@@ -37,7 +37,7 @@ myKeys conf@(XConfig {XMonad.modMask = modm}) = M.fromList $
         ((modm, xK_c), spawn "emacsclient --create-frame --no-wait"),
         ((modm, xK_p), spawn "kupfer"),
 
-        ((modm .|. shiftMask, xK_c ), kill),
+        ((modm, xK_w ), kill),
         ((modm, xK_space ), sendMessage NextLayout),
         ((modm .|. shiftMask, xK_space ), setLayout $ XMonad.layoutHook conf),
         ((modm, xK_j ), windows W.focusDown),
@@ -61,8 +61,7 @@ myKeys conf@(XConfig {XMonad.modMask = modm}) = M.fromList $
     -- mod-shift-{o,e,u}, Move client to screen 1, 2, or 3
     [((m .|. modm, key), f sc)
         | (key, sc) <- zip [xK_o, xK_e, xK_u] [0..]
-        , (f, m) <- [(viewScreen, 0), (sendToScreen, shiftMask)]
-    ]
+        , (f, m) <- [(viewScreen def, 0), (sendToScreen def, shiftMask)]]
     ++
 
     -- mod-[1..9], Switch to workspace N