diff options
author | Alex Tarkovsky <alextarkovsky@gmail.com> | 2007-09-05 22:01:28 +0200 |
---|---|---|
committer | Alex Tarkovsky <alextarkovsky@gmail.com> | 2007-09-05 22:01:28 +0200 |
commit | a2ceae3cf6f302de2420f072238a29c9fbe8d974 (patch) | |
tree | bdd6ec53b679432c8a88a1cb60e4bc437b86a3dd /Square.hs | |
parent | bea7c7116f233a785e4c96a1d577ca2797fe70bf (diff) | |
download | XMonadContrib-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 'Square.hs')
-rw-r--r-- | Square.hs | 2 |
1 files changed, 2 insertions, 0 deletions
@@ -38,6 +38,8 @@ import XMonadContrib.LayoutHelpers ( l2lModDo, idModify ) -- > [(twoPane 0.03 0.2,1),(combo [(twoPane 0.03 0.8,1),(square,1)] -- > [(tabbed,3),(tabbed,30),(tabbed,1),(tabbed,1)] +-- %import XMonadContrib.Square + square :: Layout a square = Layout { doLayout = l2lModDo arrange, modifyLayout = idModify } where arrange :: Rectangle -> [a] -> [(a, Rectangle)] |