From 4b81ef7381385f6fe7fafffe2723c0d59a549fe0 Mon Sep 17 00:00:00 2001
From: David Roundy <droundy@darcs.net>
Date: Tue, 25 Sep 2007 19:41:34 +0200
Subject: add support for parseable layouts not in the default.

darcs-hash:20070925174134-72aca-3c3520c200c097938c56f7dd7fd5c86948d52c15.gz
---
 Config.hs | 7 +++++++
 1 file changed, 7 insertions(+)

(limited to 'Config.hs')

diff --git a/Config.hs b/Config.hs
index 66f4fec..5c33072 100644
--- a/Config.hs
+++ b/Config.hs
@@ -92,6 +92,13 @@ borderWidth = 1
 -- |
 -- The default set of tiling algorithms
 --
+otherPossibleLayouts :: [SomeLayout Window]
+otherPossibleLayouts = [SomeLayout $ Tall 1 1 1
+                       ,SomeLayout $ Mirror $ Tall 1 1 1
+                       ,SomeLayout Full
+                       -- Extension-provided layouts
+                       ]
+
 defaultLayouts :: [SomeLayout Window]
 defaultLayouts = [SomeLayout tiled
                  ,SomeLayout $ Mirror tiled
-- 
cgit v1.2.3