diff options
author | Jason Creighton <jcreigh@gmail.com> | 2007-05-16 05:14:37 +0200 |
---|---|---|
committer | Jason Creighton <jcreigh@gmail.com> | 2007-05-16 05:14:37 +0200 |
commit | 9f2a16d8682c2842b59ffdf3c9e182ec044f54de (patch) | |
tree | e598766453c94b3607a9d75b048d1da2a880a784 /Config.hs | |
parent | 0bcb67752095fb875ff79715b90be84577698234 (diff) | |
download | xmonad-9f2a16d8682c2842b59ffdf3c9e182ec044f54de.tar.gz xmonad-9f2a16d8682c2842b59ffdf3c9e182ec044f54de.tar.xz xmonad-9f2a16d8682c2842b59ffdf3c9e182ec044f54de.zip |
variable number of windows in master area
darcs-hash:20070516031437-b9aa7-03d82cb2565a45fa0e17a34c4c20740b51ff625c.gz
Diffstat (limited to 'Config.hs')
-rw-r--r-- | Config.hs | 11 |
1 files changed, 10 insertions, 1 deletions
@@ -111,6 +111,10 @@ modMask = mod1Mask defaultDelta :: Rational defaultDelta = 3%100 +-- The default number of windows in the master area +defaultWindowsInMaster :: Int +defaultWindowsInMaster = 1 + -- numlock handling: -- -- The mask for the numlock key. You may need to change this on some systems. @@ -135,7 +139,9 @@ borderWidth = 1 -- The default set of Layouts: defaultLayouts :: [Layout] -defaultLayouts = [ full, tall defaultDelta (1%2), wide defaultDelta (1%2) ] +defaultLayouts = [ full, + tall defaultWindowsInMaster defaultDelta (1%2), + wide defaultWindowsInMaster defaultDelta (1%2) ] -- -- The key bindings list. @@ -157,6 +163,9 @@ keys = M.fromList $ , ((modMask, xK_h ), sendMessage Shrink) , ((modMask, xK_l ), sendMessage Expand) + , ((modMask .|. shiftMask, xK_j ), sendMessage (IncMasterN 1)) + , ((modMask .|. shiftMask, xK_k ), sendMessage (IncMasterN (-1))) + , ((modMask .|. shiftMask, xK_c ), kill) , ((modMask .|. shiftMask, xK_q ), io $ exitWith ExitSuccess) |