aboutsummaryrefslogtreecommitdiffstats
path: root/Mosaic.hs
diff options
context:
space:
mode:
authorDavid Roundy <droundy@darcs.net>2007-06-01 20:32:40 +0200
committerDavid Roundy <droundy@darcs.net>2007-06-01 20:32:40 +0200
commit7ef3c452e3b9878f6423ca64d25631bc7a422695 (patch)
tree3864fdd912ad941c76cb2342e18251259cb949a0 /Mosaic.hs
parentf67ce40adf3a62e453734b51e956aa1e7175cee9 (diff)
downloadXMonadContrib-7ef3c452e3b9878f6423ca64d25631bc7a422695.tar.gz
XMonadContrib-7ef3c452e3b9878f6423ca64d25631bc7a422695.tar.xz
XMonadContrib-7ef3c452e3b9878f6423ca64d25631bc7a422695.zip
maximize rather than minimize the rating.
darcs-hash:20070601183240-72aca-496237c05e03b76ae05495afb22b36ced21d7b60.gz
Diffstat (limited to 'Mosaic.hs')
-rw-r--r--Mosaic.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Mosaic.hs b/Mosaic.hs
index 2b1e96b..1f1eda5 100644
--- a/Mosaic.hs
+++ b/Mosaic.hs
@@ -153,7 +153,7 @@ mosaicL f hints origRect origws
mc_mosaic :: [NamedWindow] -> CutDirection
-> Rated Double (Mosaic (NamedWindow,Rectangle))
mc_mosaic ws d = fmap (rect_mosaic origRect d) $
- anneal (zipML (example_mosaic ws) (map findarea ws))
+ annealMax (zipML (example_mosaic ws) (map findarea ws))
(the_rating . rate_mosaic ratew . rect_mosaic origRect d )
changeMosaic