module Villefort.Config (defaultConfig) where
import Villefort.Definitions (VConfig(..)
, daily
, monthly
, yearly
, weekly
, port
, noCustom
, showDatabase
, colors
, database
, Weekly(..)
, monday
, tuesday
, wednesday
, thursday
, friday
, saturday
, sunday)
defaultConfig :: VConfig
defaultConfig = VConfig {
daily = [return []],
monthly =[return []],
yearly =[return []],
weekly = defWeekly,
port = 3002,
noCustom = False,
showDatabase = False,
colors = defColors,
database = []
}
defWeekly :: Weekly
defWeekly = Weekly {
monday = [return []],
tuesday =[return[]],
wednesday = [return[]],
thursday = [return[]],
friday = [return[]],
saturday = [return[]],
sunday = [return []]
}
defColors :: [String]
defColors = ["#0d47a1"
,"#1565c0"
,"#1976d2"
,"#1e88e5"
,"#2196f3"
,"#42a5f5"
,"#64b5f6"
,"#90caf9"]