From 8d7ed598e2bea8f06bb27142b0b3f0fbef48c316 Mon Sep 17 00:00:00 2001
From: hasufell <hasufell@hasufell.de>
Date: Sun, 16 Nov 2014 17:25:58 +0100
Subject: [PATCH] DIAG: rm unused parameter

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

diff --git a/Graphics/Diagram/Plotter.hs b/Graphics/Diagram/Plotter.hs
index 129c7f4..e942436 100644
--- a/Graphics/Diagram/Plotter.hs
+++ b/Graphics/Diagram/Plotter.hs
@@ -157,7 +157,7 @@ convexHLs = Diag chl
 convexHStepsLs :: Diag
 convexHStepsLs = GifDiag chs
   where
-    chs p col f vt =
+    chs _ col f vt =
       fmap mkChDiag (f vt)
       where
         mkChDiag vt' =