aboutsummaryrefslogtreecommitdiffstats
path: root/Square.hs
diff options
context:
space:
mode:
authorjoachim.fasting <joachim.fasting@gmail.com>2007-06-23 20:49:38 +0200
committerjoachim.fasting <joachim.fasting@gmail.com>2007-06-23 20:49:38 +0200
commitbd8189768d102f37c9a4b3575b1afb1c039b798b (patch)
treef5271d0a68c6a038c3f236d751059fa3ae7b9017 /Square.hs
parent18bea77893a92fd8a14ba81d6444e3938bffb991 (diff)
downloadXMonadContrib-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.hs10
1 files changed, 5 insertions, 5 deletions
diff --git a/Square.hs b/Square.hs
index 43e80b6..4da5130 100644
--- a/Square.hs
+++ b/Square.hs
@@ -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)]