From 6e2873ece152bd067c291f5f57041dc69d584221 Mon Sep 17 00:00:00 2001
From: hasufell <hasufell@hasufell.de>
Date: Sun, 5 Oct 2014 15:57:31 +0200
Subject: [PATCH] Improve haddock documentation

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

diff --git a/Diagram.hs b/Diagram.hs
index cc275b9..378eaae 100644
--- a/Diagram.hs
+++ b/Diagram.hs
@@ -36,7 +36,8 @@ diagFromVTable prop vt
               mkPoint (x,y) = p2 (x,y)
 
 
--- |Create the Diagram from a String.
+-- |Create the Diagram from a String which is supposed to be the contents
+-- of an obj file.
 diagFromString :: DiagProp -> String -> Diagram Cairo R2
 diagFromString prop mesh
   = diagFromVTable prop .