{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
module Amazonka.SWF.Types.RequestCancelActivityTaskDecisionAttributes where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import qualified Amazonka.Prelude as Prelude
data RequestCancelActivityTaskDecisionAttributes = RequestCancelActivityTaskDecisionAttributes'
{
RequestCancelActivityTaskDecisionAttributes -> Text
activityId :: Prelude.Text
}
deriving (RequestCancelActivityTaskDecisionAttributes
-> RequestCancelActivityTaskDecisionAttributes -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: RequestCancelActivityTaskDecisionAttributes
-> RequestCancelActivityTaskDecisionAttributes -> Bool
$c/= :: RequestCancelActivityTaskDecisionAttributes
-> RequestCancelActivityTaskDecisionAttributes -> Bool
== :: RequestCancelActivityTaskDecisionAttributes
-> RequestCancelActivityTaskDecisionAttributes -> Bool
$c== :: RequestCancelActivityTaskDecisionAttributes
-> RequestCancelActivityTaskDecisionAttributes -> Bool
Prelude.Eq, ReadPrec [RequestCancelActivityTaskDecisionAttributes]
ReadPrec RequestCancelActivityTaskDecisionAttributes
Int -> ReadS RequestCancelActivityTaskDecisionAttributes
ReadS [RequestCancelActivityTaskDecisionAttributes]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [RequestCancelActivityTaskDecisionAttributes]
$creadListPrec :: ReadPrec [RequestCancelActivityTaskDecisionAttributes]
readPrec :: ReadPrec RequestCancelActivityTaskDecisionAttributes
$creadPrec :: ReadPrec RequestCancelActivityTaskDecisionAttributes
readList :: ReadS [RequestCancelActivityTaskDecisionAttributes]
$creadList :: ReadS [RequestCancelActivityTaskDecisionAttributes]
readsPrec :: Int -> ReadS RequestCancelActivityTaskDecisionAttributes
$creadsPrec :: Int -> ReadS RequestCancelActivityTaskDecisionAttributes
Prelude.Read, Int -> RequestCancelActivityTaskDecisionAttributes -> ShowS
[RequestCancelActivityTaskDecisionAttributes] -> ShowS
RequestCancelActivityTaskDecisionAttributes -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [RequestCancelActivityTaskDecisionAttributes] -> ShowS
$cshowList :: [RequestCancelActivityTaskDecisionAttributes] -> ShowS
show :: RequestCancelActivityTaskDecisionAttributes -> String
$cshow :: RequestCancelActivityTaskDecisionAttributes -> String
showsPrec :: Int -> RequestCancelActivityTaskDecisionAttributes -> ShowS
$cshowsPrec :: Int -> RequestCancelActivityTaskDecisionAttributes -> ShowS
Prelude.Show, forall x.
Rep RequestCancelActivityTaskDecisionAttributes x
-> RequestCancelActivityTaskDecisionAttributes
forall x.
RequestCancelActivityTaskDecisionAttributes
-> Rep RequestCancelActivityTaskDecisionAttributes x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep RequestCancelActivityTaskDecisionAttributes x
-> RequestCancelActivityTaskDecisionAttributes
$cfrom :: forall x.
RequestCancelActivityTaskDecisionAttributes
-> Rep RequestCancelActivityTaskDecisionAttributes x
Prelude.Generic)
newRequestCancelActivityTaskDecisionAttributes ::
Prelude.Text ->
RequestCancelActivityTaskDecisionAttributes
newRequestCancelActivityTaskDecisionAttributes :: Text -> RequestCancelActivityTaskDecisionAttributes
newRequestCancelActivityTaskDecisionAttributes
Text
pActivityId_ =
RequestCancelActivityTaskDecisionAttributes'
{ $sel:activityId:RequestCancelActivityTaskDecisionAttributes' :: Text
activityId =
Text
pActivityId_
}
requestCancelActivityTaskDecisionAttributes_activityId :: Lens.Lens' RequestCancelActivityTaskDecisionAttributes Prelude.Text
requestCancelActivityTaskDecisionAttributes_activityId :: Lens' RequestCancelActivityTaskDecisionAttributes Text
requestCancelActivityTaskDecisionAttributes_activityId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RequestCancelActivityTaskDecisionAttributes' {Text
activityId :: Text
$sel:activityId:RequestCancelActivityTaskDecisionAttributes' :: RequestCancelActivityTaskDecisionAttributes -> Text
activityId} -> Text
activityId) (\s :: RequestCancelActivityTaskDecisionAttributes
s@RequestCancelActivityTaskDecisionAttributes' {} Text
a -> RequestCancelActivityTaskDecisionAttributes
s {$sel:activityId:RequestCancelActivityTaskDecisionAttributes' :: Text
activityId = Text
a} :: RequestCancelActivityTaskDecisionAttributes)
instance
Prelude.Hashable
RequestCancelActivityTaskDecisionAttributes
where
hashWithSalt :: Int -> RequestCancelActivityTaskDecisionAttributes -> Int
hashWithSalt
Int
_salt
RequestCancelActivityTaskDecisionAttributes' {Text
activityId :: Text
$sel:activityId:RequestCancelActivityTaskDecisionAttributes' :: RequestCancelActivityTaskDecisionAttributes -> Text
..} =
Int
_salt forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
activityId
instance
Prelude.NFData
RequestCancelActivityTaskDecisionAttributes
where
rnf :: RequestCancelActivityTaskDecisionAttributes -> ()
rnf RequestCancelActivityTaskDecisionAttributes' {Text
activityId :: Text
$sel:activityId:RequestCancelActivityTaskDecisionAttributes' :: RequestCancelActivityTaskDecisionAttributes -> Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Text
activityId
instance
Data.ToJSON
RequestCancelActivityTaskDecisionAttributes
where
toJSON :: RequestCancelActivityTaskDecisionAttributes -> Value
toJSON
RequestCancelActivityTaskDecisionAttributes' {Text
activityId :: Text
$sel:activityId:RequestCancelActivityTaskDecisionAttributes' :: RequestCancelActivityTaskDecisionAttributes -> Text
..} =
[Pair] -> Value
Data.object
( forall a. [Maybe a] -> [a]
Prelude.catMaybes
[forall a. a -> Maybe a
Prelude.Just (Key
"activityId" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
activityId)]
)