module FortyTwo.Renderers.Multiselect (renderOptions, renderOption) where
import FortyTwo.Types (Option(..), Options)
import System.Console.ANSI
import Control.Monad (when)
import FortyTwo.Constants
renderOptions :: Options -> IO ()
renderOptions = mapM_ renderOption
renderOption :: Option -> IO()
renderOption Option { isSelected, isFocused, value } = do
if isFocused then do
setSGR [SetColor Foreground Dull Cyan]
putStr $ focusIcon : " "
setSGR [Reset]
else
putStr " "
if isSelected then do
setSGR [SetColor Foreground Dull Green]
putStr [selectedIcon]
setSGR [Reset]
else putStr [unselectedIcon]
putStr $ " " ++ value
putStrLn emptyString