module Much.Config where

import Data.Aeson (FromJSON)
import Data.Map qualified as M
import Data.Text qualified as T
import GHC.Generics (Generic)
import Much.State (ColorConfig)


data Config = Config
  { colorConfig :: Maybe (ColorConfig Maybe)
  , query :: Maybe String
  , aliases :: Maybe (M.Map T.Text T.Text)
  , attachmentOverwrite :: Maybe Bool
  , attachmentDirectory :: Maybe FilePath
  } deriving (Generic)

instance FromJSON Config