1 files changed, 1 insertions, 1 deletions
diff --git a/Spiral.hs b/Spiral.hs
index ce115e5..bf3197b 100644
--- a/Spiral.hs
+++ b/Spiral.hs
@@ -51,7 +51,7 @@ blend scale ratios = zipWith (+) ratios scaleFactors
       step = (scale - (1 % 1)) / (fromIntegral len)
       scaleFactors = map (* step) . reverse . take len $ [0..]
 
-spiral :: Rational -> Layout
+spiral :: Rational -> Layout a
 spiral scale = Layout { doLayout = \r -> fibLayout r . W.integrate,
                         modifyLayout = \m -> return $ fmap resize $ fromMessage m }
     where