-- | Full data type definition for
-- CodeDeployDeploymentGroupOnPremisesTagSetListObject. See
-- 'codeDeployDeploymentGroupOnPremisesTagSetListObject' for a more
-- convenient constructor.
data CodeDeployDeploymentGroupOnPremisesTagSetListObject =
  CodeDeployDeploymentGroupOnPremisesTagSetListObject
  { _codeDeployDeploymentGroupOnPremisesTagSetListObjectOnPremisesTagGroup :: Maybe [CodeDeployDeploymentGroupTagFilter]
  } deriving (Show, Eq)

instance ToJSON CodeDeployDeploymentGroupOnPremisesTagSetListObject where
  toJSON CodeDeployDeploymentGroupOnPremisesTagSetListObject{..} =
    object $
    catMaybes
    [ fmap (("OnPremisesTagGroup",) . toJSON) _codeDeployDeploymentGroupOnPremisesTagSetListObjectOnPremisesTagGroup