diff options
| author | Dougal Stanton <dougal@dougalstanton.net> | 2007-10-20 11:25:09 +0200 |
|---|---|---|
| committer | Dougal Stanton <dougal@dougalstanton.net> | 2007-10-20 11:25:09 +0200 |
| commit | 585b545ddb27e708ccf4825cddbf98851c71044e (patch) | |
| tree | 524d65763ac89c71d3902c5f57725daec19a13c4 /ConstrainedResize.hs | |
| parent | 293b6edc3abfe9dfbb40a85a9e360ac1feb6016e (diff) | |
| download | XMonadContrib-585b545ddb27e708ccf4825cddbf98851c71044e.tar.gz XMonadContrib-585b545ddb27e708ccf4825cddbf98851c71044e.tar.xz XMonadContrib-585b545ddb27e708ccf4825cddbf98851c71044e.zip | |
Comments for ConstrainedResize
darcs-hash:20071020092509-1b04a-59beb1b1109ca1f513115f15538a669b4d55df50.gz
Diffstat (limited to 'ConstrainedResize.hs')
| -rw-r--r-- | ConstrainedResize.hs | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/ConstrainedResize.hs b/ConstrainedResize.hs index 7a553aa..6baf471 100644 --- a/ConstrainedResize.hs +++ b/ConstrainedResize.hs @@ -34,9 +34,13 @@ import Graphics.X11.Xlib.Extras -- > [ ... -- > , ((modMask, button3), (\w -> focus w >> Sqr.mouseResizeWindow w False)) -- > , ((modMask .|. shiftMask, button3), (\w -> focus w >> Sqr.mouseResizeWindow w True )) ] +-- +-- The line without the shiftMask replaces the standard mouse resize function call, so it's +-- not completely necessary but seems neater this way. -- %import qualified XMonadContrib.ConstrainedResize as Sqr -- %mousebind , ((modMask, button3), (\\w -> focus w >> Sqr.mouseResizeWindow w False)) +-- %mousebind , ((modMask .|. shiftMask, button3), (\\w -> focus w >> Sqr.mouseResizeWindow w True)) -- | Resize (floating) window with optional aspect ratio constraints. mouseResizeWindow :: Window -> Bool -> X () |