1 files changed, 1 insertions, 1 deletions
diff --git a/TwoPane.hs b/TwoPane.hs
index f5c9c92..b4d5f41 100644
--- a/TwoPane.hs
+++ b/TwoPane.hs
@@ -34,7 +34,7 @@ import StackSet ( focus, up, down)
 --
 -- > twoPane defaultDelta (1%2)
 
-twoPane :: Rational -> Rational -> Layout
+twoPane :: Rational -> Rational -> Layout a
 twoPane delta split = Layout { doLayout = \r s -> return $ arrange r s, modifyLayout = message }
  where
     arrange rect st = case reverse (up st) of