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

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

diff --git a/palette-generator/Stylix/Main.hs b/palette-generator/Stylix/Main.hs
index 54c9fbd..28e4e1c 100644
--- a/palette-generator/Stylix/Main.hs
+++ b/palette-generator/Stylix/Main.hs
@@ -22,7 +22,7 @@ mainProcess (polarity,primaryScaleDark,primaryScaleLight, input, output) = do
   setStdGen $ mkStdGen 0
 
   image <- loadImage input
-  palette <- evolve (polarity, convertRGB8 image)
+  palette <- evolve (polarity, primaryScaleDark,primaryScaleLight,convertRGB8 image)
   let outputTable = makeOutputTable $ V.map lab2rgb palette
 
   writeFile output $ encode outputTable