From 36728ae60e3effdfe645a9a34cfd2e1067a37516 Mon Sep 17 00:00:00 2001 From: Adam Vogt Date: Thu, 22 Oct 2009 06:11:26 +0200 Subject: Refer to modm as the current modMask Ignore-this: d097c7dc1746c55e1d4078a7148f9d5a This makes the config suggestions consistent with the current template. darcs-hash:20091022041126-1499c-5dd63076fdd71a61276cfc8e648bada81d9cc586.gz --- XMonad/Actions/CycleWS.hs | 26 +++++++++++++------------- 1 file changed, 13 insertions(+), 13 deletions(-) (limited to 'XMonad/Actions/CycleWS.hs') diff --git a/XMonad/Actions/CycleWS.hs b/XMonad/Actions/CycleWS.hs index f7c9fe4..18be5d8 100644 --- a/XMonad/Actions/CycleWS.hs +++ b/XMonad/Actions/CycleWS.hs @@ -90,26 +90,26 @@ import XMonad.Util.WorkspaceCompare -- > -- > -- a basic CycleWS setup -- > --- > , ((modMask x, xK_Down), nextWS) --- > , ((modMask x, xK_Up), prevWS) --- > , ((modMask x .|. shiftMask, xK_Down), shiftToNext) --- > , ((modMask x .|. shiftMask, xK_Up), shiftToPrev) --- > , ((modMask x, xK_Right), nextScreen) --- > , ((modMask x, xK_Left), prevScreen) --- > , ((modMask x .|. shiftMask, xK_Right), shiftNextScreen) --- > , ((modMask x .|. shiftMask, xK_Left), shiftPrevScreen) --- > , ((modMask x, xK_z), toggleWS) +-- > , ((modm, xK_Down), nextWS) +-- > , ((modm, xK_Up), prevWS) +-- > , ((modm .|. shiftMask, xK_Down), shiftToNext) +-- > , ((modm .|. shiftMask, xK_Up), shiftToPrev) +-- > , ((modm, xK_Right), nextScreen) +-- > , ((modm, xK_Left), prevScreen) +-- > , ((modm .|. shiftMask, xK_Right), shiftNextScreen) +-- > , ((modm .|. shiftMask, xK_Left), shiftPrevScreen) +-- > , ((modm, xK_z), toggleWS) -- -- If you want to follow the moved window, you can use both actions: -- --- > , ((modMask x .|. shiftMask, xK_Down), shiftToNext >> nextWS) --- > , ((modMask x .|. shiftMask, xK_Up), shiftToPrev >> prevWS) +-- > , ((modm .|. shiftMask, xK_Down), shiftToNext >> nextWS) +-- > , ((modm .|. shiftMask, xK_Up), shiftToPrev >> prevWS) -- -- You can also get fancier with 'moveTo', 'shiftTo', and 'findWorkspace'. -- For example: -- --- > , ((modMask x , xK_f), moveTo Next EmptyWS) -- find a free workspace --- > , ((modMask x .|. controlMask, xK_Right), -- a crazy keybinding! +-- > , ((modm , xK_f), moveTo Next EmptyWS) -- find a free workspace +-- > , ((modm .|. controlMask, xK_Right), -- a crazy keybinding! -- > do t <- findWorkspace getSortByXineramaRule Next NonEmptyWS 2 -- > windows . view $ t ) -- -- cgit v1.2.3