twin/xmonad-contrib
1
0
Fork 0
mirror of https://github.com/xmonad/xmonad-contrib.git synced 2025-05-19 11:30:22 -07:00
Code Issues Packages Projects Releases Wiki Activity

documentation patch: add a bit more context to the code snippets in X.L.IndependentScreens

Browse Source
This commit is contained in:
Daniel Wagner 2011-10-11 20:46:19 +00:00
parent c00dd7b51b
commit 189f489e03
1 changed files with 10 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
XMonad/Layout/IndependentScreens.hs
View File

@ -53,12 +53,16 @@ import XMonad.Hooks.DynamicLog
-- to specific workspace names. In the default configuration, only -- to specific workspace names. In the default configuration, only
-- the keybindings for changing workspace do this: -- the keybindings for changing workspace do this:
-- --
-- > keyBindings conf = let m = modMask conf in fromList $
-- > {- lots of other keybindings -}
-- > [((m .|. modm, k), windows $ f i) -- > [((m .|. modm, k), windows $ f i)
-- > | (i, k) <- zip (XMonad.workspaces conf) [xK_1 .. xK_9] -- > | (i, k) <- zip (XMonad.workspaces conf) [xK_1 .. xK_9]
-- > , (f, m) <- [(W.greedyView, 0), (W.shift, shiftMask)]] -- > , (f, m) <- [(W.greedyView, 0), (W.shift, shiftMask)]]
-- --
-- This should change to -- This should change to
-- --
-- > keyBindings conf = let m = modMask conf in fromList $
-- > {- lots of other keybindings -}
-- > [((m .|. modm, k), windows $ onCurrentScreen f i) -- > [((m .|. modm, k), windows $ onCurrentScreen f i)
-- > | (i, k) <- zip (workspaces' conf) [xK_1 .. xK_9] -- > | (i, k) <- zip (workspaces' conf) [xK_1 .. xK_9]
-- > , (f, m) <- [(W.greedyView, 0), (W.shift, shiftMask)]] -- > , (f, m) <- [(W.greedyView, 0), (W.shift, shiftMask)]]