diff options
| author | Adam Vogt <vogt.adam@gmail.com> | 2009-10-22 06:11:26 +0200 |
|---|---|---|
| committer | Adam Vogt <vogt.adam@gmail.com> | 2009-10-22 06:11:26 +0200 |
| commit | 36728ae60e3effdfe645a9a34cfd2e1067a37516 (patch) | |
| tree | 153d6eaf1780df2802bb8e5acefac9cbeda4d849 /XMonad/Actions/FloatSnap.hs | |
| parent | 0c9f1ac69bad6af19f3129ec50c4899bac5c149a (diff) | |
| download | XMonadContrib-36728ae60e3effdfe645a9a34cfd2e1067a37516.tar.gz XMonadContrib-36728ae60e3effdfe645a9a34cfd2e1067a37516.tar.xz XMonadContrib-36728ae60e3effdfe645a9a34cfd2e1067a37516.zip | |
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
Diffstat (limited to '')
| -rw-r--r-- | XMonad/Actions/FloatSnap.hs | 22 |
1 files changed, 11 insertions, 11 deletions
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". |