aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-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)]