From ca28ac4982651aceb2e01b3d7c991ef3697681a8 Mon Sep 17 00:00:00 2001
From: Louis Dalibard <ontake@ontake.dev>
Date: Tue, 24 Dec 2024 16:24:49 +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 8708669..a0c89e4 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