From 27cd2842cb5e02f937fcb9363856434d47a869e1 Mon Sep 17 00:00:00 2001 From: Lars-Dominik Braun Date: Sat, 1 Aug 2015 11:46:26 +0200 Subject: Switch on GHC warnings --- src/Codec/Pesto/Dot.lhs | 1 - 1 file changed, 1 deletion(-) (limited to 'src/Codec/Pesto/Dot.lhs') diff --git a/src/Codec/Pesto/Dot.lhs b/src/Codec/Pesto/Dot.lhs index a0ac161..89439e0 100644 --- a/src/Codec/Pesto/Dot.lhs +++ b/src/Codec/Pesto/Dot.lhs @@ -15,7 +15,6 @@ image, for example. > f (a, b) = show a ++ " -> " ++ show b ++ ";" > e = map f edges > n = map (\(a, b) -> show a ++ " [label=\"" ++ dotEncodeString (serialize b) ++ "\"];") nodes -> addcolor = "#e6ee9c" > dotEncodeString = concatMap dotEncodeChar > dotEncodeChar '\n' = "\\n" -- cgit v1.2.3