summaryrefslogtreecommitdiff
path: root/.config
diff options
context:
space:
mode:
authorAndrew <saintruler@gmail.com>2020-12-29 12:19:56 +0400
committerAndrew <saintruler@gmail.com>2020-12-29 12:19:56 +0400
commite2d8b4838a5dc61af3492a381951af51663a7ea6 (patch)
tree16050c28e55dcf09d49e8aa95c2c5d219419063c /.config
parent8c38fb79e869b33f3954bb48d4ca889e6695af75 (diff)
Changed default behaviour of xmonad when run with multiple screens
Diffstat (limited to '.config')
-rw-r--r--.config/xmonad/xmonad.hs10
1 files changed, 9 insertions, 1 deletions
diff --git a/.config/xmonad/xmonad.hs b/.config/xmonad/xmonad.hs
index 8eb46a1..6240eb6 100644
--- a/.config/xmonad/xmonad.hs
+++ b/.config/xmonad/xmonad.hs
@@ -29,6 +29,7 @@ import XMonad.Layout.NoBorders
import XMonad.Util.Run -- (runProcessWithInput, safeSpawn, spawnPipe)
import XMonad.Util.SpawnOnce
import Graphics.X11.ExtraTypes.XF86
+import XMonad.Actions.CycleWS
-- The preferred terminal program, which is used in a binding below and by
-- certain contrib modules.
@@ -143,7 +144,14 @@ myKeys conf@(XConfig {XMonad.modMask = modm}) = M.fromList $
--
[((m .|. modm, k), windows $ f i)
| (i, k) <- zip (XMonad.workspaces conf) [xK_1 .. xK_9]
- , (f, m) <- [(W.greedyView, 0), (W.shift, shiftMask)]]
+ , (f, m) <- [(W.view, 0), (W.shift, shiftMask)]]
+ ++
+
+ [ ((modm .|. shiftMask, xK_Right), shiftNextScreen)
+ , ((modm .|. shiftMask, xK_Left), shiftPrevScreen)
+ , ((modm, xK_Right), nextScreen)
+ , ((modm, xK_Left), prevScreen)
+ ]
++
-- Custom applications bindings