{-# LANGUAGE DeriveGeneric #-}
module Web.ExtraLife.TeamMember where
import Prelude
import Data.Time as Time
import Data.Text ( Text )
import GHC.Generics ( Generic )
import Data.Aeson as Aeson
data TeamMember =
TeamMember { displayName :: !Text
, fundraisingGoal :: Float
, participantID :: Int
, teamName :: Text
, eventName :: Text
, avatarImageURL :: !String
, createdDateUTC :: !Time.UTCTime
, sumDonations :: Float
, teamID :: Int
, isTeamCaptain :: Bool
, numDonations :: Int
} deriving ( Show, Generic )
instance FromJSON TeamMember
instance ToJSON TeamMember