diff options
| author | David Roundy <droundy@darcs.net> | 2007-09-21 23:21:59 +0200 |
|---|---|---|
| committer | David Roundy <droundy@darcs.net> | 2007-09-21 23:21:59 +0200 |
| commit | 365e1400645e970fe1d4d07401235a9bf044dbb9 (patch) | |
| tree | 4b498023867881b8e7392235b7e39037a292b2b1 /Config.hs | |
| parent | b7aaefbace2867206bd77f19660f7ae6c628fdb5 (diff) | |
| download | xmonad-365e1400645e970fe1d4d07401235a9bf044dbb9.tar.gz xmonad-365e1400645e970fe1d4d07401235a9bf044dbb9.tar.xz xmonad-365e1400645e970fe1d4d07401235a9bf044dbb9.zip | |
add layout selection back into core xmonad using LayoutSelection.
This is just a reimplementation of LayoutChoice.
darcs-hash:20070921212159-72aca-870bb8d3e596fcb9edc48f51bec538054b4165e6.gz
Diffstat (limited to 'Config.hs')
| -rw-r--r-- | Config.hs | 10 |
1 files changed, 5 insertions, 5 deletions
@@ -92,10 +92,10 @@ borderWidth = 1 -- | -- The default set of tiling algorithms -- -defaultLayouts :: [SomeLayout Window] -defaultLayouts = [ SomeLayout tiled - , SomeLayout $ Mirror tiled - , SomeLayout Full +defaultLayouts :: [(String, SomeLayout Window)] +defaultLayouts = [("tall", SomeLayout tiled) + ,("wide", SomeLayout $ Mirror tiled) + ,("full", SomeLayout Full) -- Extension-provided layouts ] @@ -135,7 +135,7 @@ keys = M.fromList $ , ((modMask .|. shiftMask, xK_p ), spawn "gmrun") -- %! Launch gmrun , ((modMask .|. shiftMask, xK_c ), kill) -- %! Close the focused window - , ((modMask, xK_space ), switchLayout) -- %! Rotate through the available layout algorithms + , ((modMask, xK_space ), sendMessage NextLayout) -- %! Rotate through the available layout algorithms , ((modMask, xK_n ), refresh) -- %! Resize viewed windows to the correct size |