diff options
| author | Spencer Janssen <sjanssen@cse.unl.edu> | 2007-10-10 08:26:04 +0200 |
|---|---|---|
| committer | Spencer Janssen <sjanssen@cse.unl.edu> | 2007-10-10 08:26:04 +0200 |
| commit | b821819d4ba485ffa04fc3f8faef9af57a860409 (patch) | |
| tree | 0e0db695b16d4331e8b229cb478023a7b629583c /Operations.hs | |
| parent | 5491a9fcc9d6969450a7743fd40a5661b06f61d5 (diff) | |
| download | xmonad-b821819d4ba485ffa04fc3f8faef9af57a860409.tar.gz xmonad-b821819d4ba485ffa04fc3f8faef9af57a860409.tar.xz xmonad-b821819d4ba485ffa04fc3f8faef9af57a860409.zip | |
Only adjust floating windows that are actually larger than the screen
Also, fix a typo caught by Xiao-Yong Jin on the mailing list.
darcs-hash:20071010062604-a5988-7f17c5523557117ebee195088d04ae0eb4e806c8.gz
Diffstat (limited to 'Operations.hs')
| -rw-r--r-- | Operations.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Operations.hs b/Operations.hs index 9acfaf0..fe83754 100644 --- a/Operations.hs +++ b/Operations.hs @@ -56,7 +56,7 @@ manage w = whenX (fmap not $ isClient w) $ withDisplay $ \d -> do (sc, rr) <- floatLocation w -- ensure that float windows don't go over the edge of the screen - let adjust (W.RationalRect x y wid h) | x + wid >= 1 || y + wid >= 1 || x <= 0 || y <= 0 + let adjust (W.RationalRect x y wid h) | x + wid > 1 || y + h > 1 || x < 0 || y < 0 = W.RationalRect (0.5 - wid/2) (0.5 - h/2) wid h adjust r = r |