aboutsummaryrefslogtreecommitdiffstats
path: root/LayoutScreens.hs
diff options
context:
space:
mode:
authorAlex Tarkovsky <alextarkovsky@gmail.com>2007-09-05 22:01:28 +0200
committerAlex Tarkovsky <alextarkovsky@gmail.com>2007-09-05 22:01:28 +0200
commita2ceae3cf6f302de2420f072238a29c9fbe8d974 (patch)
treebdd6ec53b679432c8a88a1cb60e4bc437b86a3dd /LayoutScreens.hs
parentbea7c7116f233a785e4c96a1d577ca2797fe70bf (diff)
downloadXMonadContrib-a2ceae3cf6f302de2420f072238a29c9fbe8d974.tar.gz
XMonadContrib-a2ceae3cf6f302de2420f072238a29c9fbe8d974.tar.xz
XMonadContrib-a2ceae3cf6f302de2420f072238a29c9fbe8d974.zip
Docstring parser for generating xmonad build configs with default settings for extensions
darcs-hash:20070905200128-bd4fb-ff90db3eb7ebce6ea75956f19ebc6c35d36c08d4.gz
Diffstat (limited to 'LayoutScreens.hs')
-rw-r--r--LayoutScreens.hs4
1 files changed, 4 insertions, 0 deletions
diff --git a/LayoutScreens.hs b/LayoutScreens.hs
index 9d74189..a78a402 100644
--- a/LayoutScreens.hs
+++ b/LayoutScreens.hs
@@ -40,6 +40,10 @@ import Graphics.X11.Xlib.Extras
-- > , ((modMask .|. shiftMask, xK_space), layoutScreens 2 (twoPane 0.5 0.5))
-- > , ((controlMask .|. modMask .|. shiftMask, xK_space), rescreen)
+-- %import XMonadContrib.LayoutScreens
+-- %keybind , ((modMask .|. shiftMask, xK_space), layoutScreens 2 (twoPane 0.5 0.5))
+-- %keybind , ((controlMask .|. modMask .|. shiftMask, xK_space), rescreen)
+
layoutScreens :: Int -> Layout Int -> X ()
layoutScreens nscr _ | nscr < 1 = trace $ "Can't layoutScreens with only " ++ show nscr ++ " screens."
layoutScreens nscr l =