From bd8189768d102f37c9a4b3575b1afb1c039b798b Mon Sep 17 00:00:00 2001
From: "joachim.fasting" <joachim.fasting@gmail.com>
Date: Sat, 23 Jun 2007 20:49:38 +0200
Subject: Square.hs: put usage instructions after imports for Haddock
 compatibility.

darcs-hash:20070623184938-ea16c-3f050d8e4cef255bef37dd11f5b12c53bc1a129a.gz
---
 Square.hs | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

(limited to 'Square.hs')

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)]
-- 
cgit v1.2.3