From 346cc3269ee31062fa7eb560f90c4059c6279962 Mon Sep 17 00:00:00 2001 From: "joachim.fasting" Date: Wed, 20 Jun 2007 00:03:23 +0200 Subject: Fix type signatures. Think this fixes the rest of the errors caused by the Layout change. darcs-hash:20070619220323-ea16c-3274cd24d01bc932089ab88191ccda316ea93b01.gz --- Square.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Square.hs') diff --git a/Square.hs b/Square.hs index 3f9e29e..3564d62 100644 --- a/Square.hs +++ b/Square.hs @@ -40,7 +40,7 @@ import StackSet ( integrate ) -- > (mirror $ twoPane 0.03 0.85),1)] (twoPane 0.03 0.5) ) -square :: Layout +square :: Layout Window square = Layout { doLayout = \r s -> arrange r (integrate s), modifyLayout = message } where arrange rect ws@(_:_) = do -- cgit v1.2.3