diff options
author | Daniel Silverstone <dsilvers@digital-scurf.org> | 2016-12-30 16:08:53 +0000 |
---|---|---|
committer | Daniel Silverstone <dsilvers@digital-scurf.org> | 2016-12-30 16:08:53 +0000 |
commit | 2ebfffcd4090fb89036b92967548be2d4bde3d76 (patch) | |
tree | cd6fe64f038f81d61527a1799f270fd5c586cf5b /desktop/xmonad | |
parent | 5bc02a56289fcb66d78052ba5e88b05d967309d9 (diff) | |
download | resources-2ebfffcd4090fb89036b92967548be2d4bde3d76.tar.bz2 |
IRC and swapping in xmonad
Diffstat (limited to 'desktop/xmonad')
-rw-r--r-- | desktop/xmonad/xmonad.hs | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/desktop/xmonad/xmonad.hs b/desktop/xmonad/xmonad.hs index bac9874..bbff8dd 100644 --- a/desktop/xmonad/xmonad.hs +++ b/desktop/xmonad/xmonad.hs @@ -119,6 +119,8 @@ main = do , ("<XF86Forward>", DO.moveTo Next HiddenWS) -- , ("M1-<Left>", DO.moveTo Prev HiddenWS) -- , ("M1-<Right>", DO.moveTo Next HiddenWS) + , ("M-C-<Right>", DO.swapWith Next NonEmptyWS) + , ("M-C-<Left>", DO.swapWith Prev NonEmptyWS) , ("M1-C-S-<Left>", DO.shiftTo Prev HiddenWS >> DO.moveTo Prev HiddenWS) , ("M1-C-S-<Right>", DO.shiftTo Next HiddenWS >> DO.moveTo Next HiddenWS) , ("M1-C-<Up>", prevScreen) @@ -146,7 +148,7 @@ main = do `EZ.additionalKeys` extraKeyMappings mod4Mask defaultWorkSpaces :: [String] -defaultWorkSpaces = ["mail", "term", "www", "emacs"] +defaultWorkSpaces = ["mail", "irc", "www", "emacs"] extraKeyMappings :: ButtonMask -> [((ButtonMask, KeySym), X ())] extraKeyMappings modm = |