diff options
author | joachim.fasting <joachim.fasting@gmail.com> | 2007-06-23 20:49:38 +0200 |
---|---|---|
committer | joachim.fasting <joachim.fasting@gmail.com> | 2007-06-23 20:49:38 +0200 |
commit | bd8189768d102f37c9a4b3575b1afb1c039b798b (patch) | |
tree | f5271d0a68c6a038c3f236d751059fa3ae7b9017 /Square.hs | |
parent | 18bea77893a92fd8a14ba81d6444e3938bffb991 (diff) | |
download | XMonadContrib-bd8189768d102f37c9a4b3575b1afb1c039b798b.tar.gz XMonadContrib-bd8189768d102f37c9a4b3575b1afb1c039b798b.tar.xz XMonadContrib-bd8189768d102f37c9a4b3575b1afb1c039b798b.zip |
Square.hs: put usage instructions after imports for Haddock compatibility.
darcs-hash:20070623184938-ea16c-3f050d8e4cef255bef37dd11f5b12c53bc1a129a.gz
Diffstat (limited to 'Square.hs')
-rw-r--r-- | Square.hs | 10 |
1 files changed, 5 insertions, 5 deletions
@@ -22,6 +22,11 @@ module XMonadContrib.Square ( -- $usage square ) where +import XMonad +import Graphics.X11.Xlib +import StackSet ( integrate ) +import XMonadContrib.LayoutHelpers ( l2lModDo ) + -- $usage -- You can use this module with the following in your Config.hs file: -- @@ -35,11 +40,6 @@ module XMonadContrib.Square ( -- > ,(combo [(twoPane 0.03 0.8,1),(square,1)] -- > (mirror $ twoPane 0.03 0.85),1)] (twoPane 0.03 0.5) ) -import XMonad -import Graphics.X11.Xlib -import StackSet ( integrate ) -import XMonadContrib.LayoutHelpers ( l2lModDo ) - square :: Layout a square = Layout { doLayout = l2lModDo arrange, modifyLayout = const (return Nothing) } where arrange :: Rectangle -> [a] -> [(a, Rectangle)] |