aboutsummaryrefslogtreecommitdiffstats
path: root/Circle.hs
diff options
context:
space:
mode:
authorSpencer Janssen <sjanssen@cse.unl.edu>2007-06-10 22:38:40 +0200
committerSpencer Janssen <sjanssen@cse.unl.edu>2007-06-10 22:38:40 +0200
commitc55dea78d8cd2c748b35607966ffbb2625003fce (patch)
tree9fd96e7f5cc30c42ce6d71735ce20e00c2587673 /Circle.hs
parent448b7d5258f79ca1ce59ef6d00861eb32f5a48f3 (diff)
downloadXMonadContrib-c55dea78d8cd2c748b35607966ffbb2625003fce.tar.gz
XMonadContrib-c55dea78d8cd2c748b35607966ffbb2625003fce.tar.xz
XMonadContrib-c55dea78d8cd2c748b35607966ffbb2625003fce.zip
Updates for Layout API change
darcs-hash:20070610203840-a5988-bcd9a2f4010d1981575cf24aa38ee1760d7976c2.gz
Diffstat (limited to 'Circle.hs')
-rw-r--r--Circle.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Circle.hs b/Circle.hs
index cf0bcb8..9e30c83 100644
--- a/Circle.hs
+++ b/Circle.hs
@@ -5,7 +5,7 @@ import XMonad
circle :: Layout
circle = Layout { doLayout = circleLayout,
- modifyLayout = const Nothing }
+ modifyLayout = return . const Nothing }
circleLayout :: Rectangle -> [Window] -> X [(Window, Rectangle)]
circleLayout _ [] = return []