From 4137af7a7f7221645a8911ae5c0e19cfee93ba6e Mon Sep 17 00:00:00 2001
From: hasufell <hasufell@hasufell.de>
Date: Fri, 10 Oct 2014 01:08:53 +0200
Subject: [PATCH] DIAGRAM: Fix haddock comment

---
 Diagram.hs | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/Diagram.hs b/Diagram.hs
index f0f13a7..8bbcfb2 100644
--- a/Diagram.hs
+++ b/Diagram.hs
@@ -273,7 +273,8 @@ whiteRect :: Double -> Double -> Diagram Cairo R2
 whiteRect x y = rect x y # lwG 0.00 # bg white
 
 
--- |Create a grid across the whole diagram with 50*50 squares.
+-- |Create a grid across the whole diagram with squares of the
+-- given size in DiagProp.
 grid :: Diag
 grid = Diag xGrid `mappend` Diag yGrid
   where