From ae9451ec4902ca551524f029f4b3e201702019a6 Mon Sep 17 00:00:00 2001
From: Louis Dalibard <ontake@ontake.dev>
Date: Tue, 24 Dec 2024 16:30:03 +0100
Subject: [PATCH] yes

---
 palette-generator/Stylix/Palette.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/palette-generator/Stylix/Palette.hs b/palette-generator/Stylix/Palette.hs
index d19322d..0a06dac 100644
--- a/palette-generator/Stylix/Palette.hs
+++ b/palette-generator/Stylix/Palette.hs
@@ -44,7 +44,7 @@ instance Species (String, Image PixelRGB8) (V.Vector LAB) where
     colour <- randomFromImage image
     return $ palette // [(index, colour)]
 
-  fitness (polarity,primaryScaleDark,primaryScaleLight, _) palette
+  fitness (polarity, _) palette
     = realToFrac $ accentDifference - (primarySimilarity/10) - scheme
       where
         -- The primary scale should use similar colours, to an extent.