module Model.Config ( Config(..) ) where import Data.Text import Model.URL data Config = Config { url :: URL , mailTo :: [Text] , properties :: [Text] , waitInMinutes :: Int } deriving (Eq, Read, Show)