From f8fa50bf90421b20a411d148007a70319ca9c9d3 Mon Sep 17 00:00:00 2001 From: Spencer Janssen Date: Fri, 4 May 2007 01:46:07 +0200 Subject: More Config.hs bugs darcs-hash:20070503234607-a5988-3f9f46071263093707fdaba677899edc1a85edc1.gz --- Config.hs | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'Config.hs') 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) -- cgit v1.2.3