twin/xmonad
1
0
Fork 0
mirror of https://github.com/xmonad/xmonad.git synced 2025-08-04 06:01:53 -07:00
Code Issues Packages Projects Releases Wiki Activity

Add docstrings for mouse controls

Browse Source
This commit is contained in:
Spencer Janssen
2007-08-24 04:59:39 +00:00
parent 314b5ee6bd
commit 49cebc6130
1 changed files with 3 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
Config.hs
View File

@@ -178,6 +178,9 @@ keys = M.fromList $
-- --
mouseBindings :: M.Map (KeyMask, Button) (Window -> X ()) mouseBindings :: M.Map (KeyMask, Button) (Window -> X ())
mouseBindings = M.fromList $ mouseBindings = M.fromList $
-- mod-button1 @@ Set the window to floating mode and move by dragging
[ ((modMask, button1), (\w -> focus w >> mouseMoveWindow w)) [ ((modMask, button1), (\w -> focus w >> mouseMoveWindow w))
-- mod-button2 @@ Raise the window to the top of the stack
, ((modMask, button2), (\w -> focus w >> swapMaster)) , ((modMask, button2), (\w -> focus w >> swapMaster))
-- mod-button3 @@ Set the window to floating mode and resize by dragging
, ((modMask, button3), (\w -> focus w >> mouseResizeWindow w)) ] , ((modMask, button3), (\w -> focus w >> mouseResizeWindow w)) ]