Config.hs

module Villefort.Config  where

import System.Process
import Villefort.Definitions
import Villefort.Database
def = VConfig {
  daily = [[]], --daily tasks
  monthly =[[]], -- not implemented
  yearly =[[]], --  not implemented
  weekly = defWeekly, -- tasks to run on a given week day
  port = 3002, -- port
  noCustom = False, -- flag for debugging stops launching custom executable
  showDatabase = False, -- optionally prints database
  colors = defColors -- Colors to use first is closest task
              }

defWeekly = Weekly {
  monday = [return []],
  tuesday =[return[]],
  wednesday = [return[]],
  thursday = [return[]],
  friday  = [return[]],
  saturday = [return[]],
  sunday  = [return []]
                   }

defColors = ["#0d47a1","#1565c0","#1976d2","#1e88e5","#2196f3","#42a5f5","#64b5f6","#90caf9"]
-- ghc -o /home/chris/.villefort/villefort /home/chris/.villefort/villefort.s