From 75f0f1d5678e4fbfcacc8e1a32a86d96411d1c21 Mon Sep 17 00:00:00 2001
From: daniel <daniel@wagner-home.com>
Date: Mon, 26 Mar 2007 09:42:34 +0200
Subject: Extra config: defaultLayout

darcs-hash:20070326074234-c98ca-624f259e215d1aad642744cae44d572d88adda60
---
 Config.hs | 4 ++++
 Main.hs   | 2 +-
 2 files changed, 5 insertions(+), 1 deletion(-)

diff --git a/Config.hs b/Config.hs
index 83d0308..8e3e49d 100644
--- a/Config.hs
+++ b/Config.hs
@@ -61,6 +61,10 @@ defaultDelta = 3%100
 numlockMask :: KeySym
 numlockMask = lockMask
 
+-- What layout to start in. See the definition of Layout in XMonad.hs for options.
+defaultLayout :: Layout
+defaultLayout = Full
+
 -- The keys list.
 keys :: M.Map (KeyMask, KeySym) (X ())
 keys = M.fromList $
diff --git a/Main.hs b/Main.hs
index b2c6ce4..b1cdd4c 100644
--- a/Main.hs
+++ b/Main.hs
@@ -50,7 +50,7 @@ main = do
             , wmprotocols  = wmprot
             , dimensions   = (displayWidth  dpy dflt, displayHeight dpy dflt)
             , workspace    = W.empty workspaces
-            , layout       = Full
+            , layout       = defaultLayout
             , leftWidth    = defaultLeftWidth
             }
 
-- 
cgit v1.2.3