move Layout stuff into class (hokey first cut).

darcs-hash:20070914215959-72aca-3feae03a6560a70908ad37d28f47c8d47321008e.gz

1 files changed, 4 insertions, 4 deletions

diff --git a/Config.hs b/Config.hs
index 9b02a92..8c55961 100644
--- a/Config.hs
+++ b/Config.hs
@@ -92,10 +92,10 @@ borderWidth = 1
 -- |
 -- The default set of tiling algorithms
 --
-defaultLayouts :: [Layout Window]
-defaultLayouts = [ tiled
-                 , mirror tiled
-                 , full
+defaultLayouts :: [SomeLayout Window]
+defaultLayouts = [ SomeLayout tiled
+                 , SomeLayout $ mirror tiled
+                 , SomeLayout full
 
                  -- Extension-provided layouts
                  ]