From 917bb796fe5e0cd6c6179ade9c698af3bf20ddd4 Mon Sep 17 00:00:00 2001
From: Don Stewart <dons@cse.unsw.edu.au>
Date: Fri, 4 May 2007 04:36:18 +0200
Subject: refactoring, style, comments on new layout code

darcs-hash:20070504023618-9c5c1-4b5a4021212b08fedff7f8ec3d8b4234431aada3
---
 XMonad.hs | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'XMonad.hs')

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