aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorSpencer Janssen <sjanssen@cse.unl.edu>2007-10-10 08:26:04 +0200
committerSpencer Janssen <sjanssen@cse.unl.edu>2007-10-10 08:26:04 +0200
commitb821819d4ba485ffa04fc3f8faef9af57a860409 (patch)
tree0e0db695b16d4331e8b229cb478023a7b629583c
parent5491a9fcc9d6969450a7743fd40a5661b06f61d5 (diff)
downloadxmonad-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
-rw-r--r--Operations.hs2
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