aboutsummaryrefslogtreecommitdiffstats
path: root/ThreeColumns.hs
diff options
context:
space:
mode:
authorDavid Roundy <droundy@darcs.net>2007-09-25 20:29:30 +0200
committerDavid Roundy <droundy@darcs.net>2007-09-25 20:29:30 +0200
commit5d42da6f605385a5692eaf34678e6d4524edad56 (patch)
tree13e15aec0414303d7f0a25aa2d074811a2947059 /ThreeColumns.hs
parent76b62aa4f8b75b704e4e34fe4c7fe536a2e6d1ea (diff)
downloadXMonadContrib-5d42da6f605385a5692eaf34678e6d4524edad56.tar.gz
XMonadContrib-5d42da6f605385a5692eaf34678e6d4524edad56.tar.xz
XMonadContrib-5d42da6f605385a5692eaf34678e6d4524edad56.zip
modifyLayout -> handleMessage.
darcs-hash:20070925182930-72aca-7941d37cac143444e9f167e3dd15944d1138a377.gz
Diffstat (limited to 'ThreeColumns.hs')
-rw-r--r--ThreeColumns.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/ThreeColumns.hs b/ThreeColumns.hs
index 520f703..66862c3 100644
--- a/ThreeColumns.hs
+++ b/ThreeColumns.hs
@@ -48,7 +48,7 @@ instance Layout ThreeCol a where
doLayout (ThreeCol nmaster _ frac) r =
return . (\x->(x,Nothing)) .
ap zip (tile3 frac r nmaster . length) . W.integrate
- modifyLayout (ThreeCol nmaster delta frac) m =
+ handleMessage (ThreeCol nmaster delta frac) m =
return $ msum [fmap resize (fromMessage m)
,fmap incmastern (fromMessage m)]
where resize Shrink = ThreeCol nmaster delta (max 0 $ frac-delta)