module Text.HTML5.MetaData.Schema.VoteAction where
import Text.HTML5.MetaData.Class
import Text.HTML5.MetaData.Type
import Data.Text
data VoteAction = VoteAction { additionalType :: AdditionalType
, alternateName :: AlternateName
, description :: Description
, image :: Image
, name :: Name
, sameAs :: SameAs
, url :: Url
, agent :: Agent
, endTime :: EndTime
, instrument :: Instrument
, location :: Location
, object :: Object
, participant :: Participant
, result :: Result
, startTime :: StartTime
, option :: Option
, candidate :: Candidate
}
deriving (Show, Read, Eq)
instance MetaData VoteAction where
_label = const "Vote Action"
_comment_plain = const ""
_comment = const ""
_url = const "http://schema.org/VoteAction"