From 899e71ab039e59586102a416e8e9595edc3622bd Mon Sep 17 00:00:00 2001
From: hasufell <hasufell@hasufell.de>
Date: Sun, 7 Dec 2014 20:00:54 +0100
Subject: [PATCH] DIAG: fix diagHeightOffset

---
 Graphics/Diagram/Core.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Graphics/Diagram/Core.hs b/Graphics/Diagram/Core.hs
index 2a5d3f3..c3ed846 100644
--- a/Graphics/Diagram/Core.hs
+++ b/Graphics/Diagram/Core.hs
@@ -122,7 +122,7 @@ diagWidthOffset p = diagXmin p + (diagWidth p / 2)
 -- |The offset on the y-axis to move the grid and the white rectangle
 -- to the right place.
 diagHeightOffset :: DiagProp -> Double
-diagHeightOffset p = diagYmin p + (diagWidth p / 2)
+diagHeightOffset p = diagYmin p + (diagHeight p / 2)
 
 
 -- |Returns the specified diagram if True is passed,