From a2ceae3cf6f302de2420f072238a29c9fbe8d974 Mon Sep 17 00:00:00 2001 From: Alex Tarkovsky Date: Wed, 5 Sep 2007 22:01:28 +0200 Subject: Docstring parser for generating xmonad build configs with default settings for extensions darcs-hash:20070905200128-bd4fb-ff90db3eb7ebce6ea75956f19ebc6c35d36c08d4.gz --- Mosaic.hs | 10 ++++++++++ 1 file changed, 10 insertions(+) (limited to 'Mosaic.hs') diff --git a/Mosaic.hs b/Mosaic.hs index 59a6a68..ae2fd5d 100644 --- a/Mosaic.hs +++ b/Mosaic.hs @@ -59,6 +59,16 @@ import XMonadContrib.Anneal -- > , ((controlMask .|. modMask .|. shiftMask, xK_o ), withNamedWindow (sendMessage . flexibleWindow)) -- +-- %import XMonadContrib.Mosaic +-- %keybind , ((controlMask .|. modMask .|. shiftMask, xK_h), withNamedWindow (sendMessage . tallWindow)) +-- %keybind , ((controlMask .|. modMask .|. shiftMask, xK_l), withNamedWindow (sendMessage . wideWindow)) +-- %keybind , ((modMask .|. shiftMask, xK_h ), withNamedWindow (sendMessage . shrinkWindow)) +-- %keybind , ((modMask .|. shiftMask, xK_l ), withNamedWindow (sendMessage . expandWindow)) +-- %keybind , ((modMask .|. shiftMask, xK_s ), withNamedWindow (sendMessage . squareWindow)) +-- %keybind , ((modMask .|. shiftMask, xK_o ), withNamedWindow (sendMessage . myclearWindow)) +-- %keybind , ((controlMask .|. modMask .|. shiftMask, xK_o ), withNamedWindow (sendMessage . flexibleWindow)) +-- %layout , mosaic 0.25 0.5 M.empty + data HandleWindow = ExpandWindow NamedWindow | ShrinkWindow NamedWindow | SquareWindow NamedWindow | ClearWindow NamedWindow | TallWindow NamedWindow | WideWindow NamedWindow -- cgit v1.2.3