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/FloatSnap.hs | 22 +++++++++++----------- 1 file changed, 11 insertions(+), 11 deletions(-) (limited to 'XMonad/Actions/FloatSnap.hs') diff --git a/XMonad/Actions/FloatSnap.hs b/XMonad/Actions/FloatSnap.hs index 357162d..3597254 100644 --- a/XMonad/Actions/FloatSnap.hs +++ b/XMonad/Actions/FloatSnap.hs @@ -41,23 +41,23 @@ import qualified Data.Set as S -- -- Then add appropriate key bindings, for example: -- --- > , ((modMask x, xK_Left), withFocused $ snapMove L Nothing) --- > , ((modMask x, xK_Right), withFocused $ snapMove R Nothing) --- > , ((modMask x, xK_Up), withFocused $ snapMove U Nothing) --- > , ((modMask x, xK_Down), withFocused $ snapMove D Nothing) --- > , ((modMask x .|. shiftMask, xK_Left), withFocused $ snapShrink R Nothing) --- > , ((modMask x .|. shiftMask, xK_Right), withFocused $ snapGrow R Nothing) --- > , ((modMask x .|. shiftMask, xK_Up), withFocused $ snapShrink D Nothing) --- > , ((modMask x .|. shiftMask, xK_Down), withFocused $ snapGrow D Nothing) +-- > , ((modm, xK_Left), withFocused $ snapMove L Nothing) +-- > , ((modm, xK_Right), withFocused $ snapMove R Nothing) +-- > , ((modm, xK_Up), withFocused $ snapMove U Nothing) +-- > , ((modm, xK_Down), withFocused $ snapMove D Nothing) +-- > , ((modm .|. shiftMask, xK_Left), withFocused $ snapShrink R Nothing) +-- > , ((modm .|. shiftMask, xK_Right), withFocused $ snapGrow R Nothing) +-- > , ((modm .|. shiftMask, xK_Up), withFocused $ snapShrink D Nothing) +-- > , ((modm .|. shiftMask, xK_Down), withFocused $ snapGrow D Nothing) -- -- For detailed instructions on editing your key bindings, see -- "XMonad.Doc.Extending#Editing_key_bindings". -- -- And possibly add an appropriate mouse binding, for example: -- --- > , ((modMask x, button1), (\w -> focus w >> mouseMoveWindow w >> snapMagicMove (Just 50) (Just 50) w)) --- > , ((modMask x .|. shiftMask, button1), (\w -> focus w >> mouseMoveWindow w >> snapMagicResize [L,R,U,D] (Just 50) (Just 50) w)) --- > , ((modMask x, button3), (\w -> focus w >> mouseResizeWindow w >> snapMagicResize [R,D] (Just 50) (Just 50) w)) +-- > , ((modm, button1), (\w -> focus w >> mouseMoveWindow w >> snapMagicMove (Just 50) (Just 50) w)) +-- > , ((modm .|. shiftMask, button1), (\w -> focus w >> mouseMoveWindow w >> snapMagicResize [L,R,U,D] (Just 50) (Just 50) w)) +-- > , ((modm, button3), (\w -> focus w >> mouseResizeWindow w >> snapMagicResize [R,D] (Just 50) (Just 50) w)) -- -- For detailed instructions on editing your mouse bindings, see -- "XMonad.Doc.Extending#Editing_mouse_bindings". -- cgit v1.2.3