From 86c71080945e5b637d9dde5c3d944d600035e2eb Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Kier=C3=A1n=20Meinhardt?= Date: Sun, 9 Oct 2022 07:14:11 +0200 Subject: [PATCH] onomastics-ng: remove unused variable --- onomastics-ng/lib/Onomap/Svg.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/onomastics-ng/lib/Onomap/Svg.hs b/onomastics-ng/lib/Onomap/Svg.hs index 80a5187..c2a8ab3 100644 --- a/onomastics-ng/lib/Onomap/Svg.hs +++ b/onomastics-ng/lib/Onomap/Svg.hs @@ -91,7 +91,7 @@ drawMap settings colorPalette areas statistics = ) (zip3 [0 ..] colorPalette theMaxima) <> foldMap - ( \(index, (name, statistic), color) -> + ( \(index, (name, statistic)) -> g_ [] ( rect_ @@ -119,6 +119,6 @@ drawMap settings colorPalette areas statistics = (toElement $ localize $ showRounded $ maximum $ getByArea statistic) ) ) - (zip3 [0 ..] statistics colorPalette) + (zip [0 ..] statistics) <> style_ [] "path { mix-blend-mode: multiply; }" <> g_ [] areaPaths