summaryrefslogtreecommitdiffstats
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
commit4d2017dc2b029fae84465fc664683d4d5bc875f1 (patch)
tree0e0db695b16d4331e8b229cb478023a7b629583c
parentb1ec70f19a68e3a136ff9565a96c9a76d287ab2b (diff)
downloadmetatile-4d2017dc2b029fae84465fc664683d4d5bc875f1.tar
metatile-4d2017dc2b029fae84465fc664683d4d5bc875f1.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
-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