From 9d3d2f85038a4b28e8e4a4dedc25ebca1102bc96 Mon Sep 17 00:00:00 2001 From: Spencer Janssen Date: Thu, 3 May 2007 23:46:07 +0000 Subject: [PATCH] More Config.hs bugs --- Config.hs | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/Config.hs b/Config.hs index 1f2598c..841b3ee 100644 --- a/Config.hs +++ b/Config.hs @@ -135,7 +135,7 @@ borderWidth = 1 -- The default set of Layouts: defaultLayouts :: [Layout] -defaultLayouts = [ full, tall defaultDelta (2%3), wide defaultDelta (2%3) ] +defaultLayouts = [ full, tall defaultDelta (1%2), wide defaultDelta (1%2) ] -- -- The key bindings list. @@ -154,8 +154,8 @@ keys = M.fromList $ , ((modMask, xK_j ), raise GT) , ((modMask, xK_k ), raise LT) - , ((modMask, xK_h ), layoutMsg Expand) - , ((modMask, xK_l ), layoutMsg Shrink) + , ((modMask, xK_h ), layoutMsg Shrink) + , ((modMask, xK_l ), layoutMsg Expand) , ((modMask .|. shiftMask, xK_c ), kill)