refactoring, style, comments on new layout code

darcs-hash:20070504023618-9c5c1-4b5a4021212b08fedff7f8ec3d8b4234431aada3.gz

1 files changed, 3 insertions, 1 deletions

diff --git a/XMonad.hs b/XMonad.hs
index 9f1a0ca..1f602c8 100644
--- a/XMonad.hs
+++ b/XMonad.hs
@@ -94,7 +94,9 @@ isRoot w = liftM (w==) (asks theRoot)
 -- Layout handling
 
 -- | The different layout modes
-data Layout = Layout { doLayout :: Rectangle -> [Window] -> [(Window, Rectangle)]
+-- 'doLayout', a pure function to layout a Window set
+-- 'modifyLayout', 
+data Layout = Layout { doLayout     :: Rectangle -> [Window] -> [(Window, Rectangle)]
                      , modifyLayout :: Dynamic -> Maybe Layout }
 
 -- ---------------------------------------------------------------------