{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE TypeFamilies #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-binds #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
module Amazonka.LexModels.GetBotChannelAssociations
(
GetBotChannelAssociations (..),
newGetBotChannelAssociations,
getBotChannelAssociations_maxResults,
getBotChannelAssociations_nameContains,
getBotChannelAssociations_nextToken,
getBotChannelAssociations_botName,
getBotChannelAssociations_botAlias,
GetBotChannelAssociationsResponse (..),
newGetBotChannelAssociationsResponse,
getBotChannelAssociationsResponse_botChannelAssociations,
getBotChannelAssociationsResponse_nextToken,
getBotChannelAssociationsResponse_httpStatus,
)
where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import Amazonka.LexModels.Types
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
data GetBotChannelAssociations = GetBotChannelAssociations'
{
GetBotChannelAssociations -> Maybe Natural
maxResults :: Prelude.Maybe Prelude.Natural,
GetBotChannelAssociations -> Maybe Text
nameContains :: Prelude.Maybe Prelude.Text,
GetBotChannelAssociations -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
GetBotChannelAssociations -> Text
botName :: Prelude.Text,
GetBotChannelAssociations -> Text
botAlias :: Prelude.Text
}
deriving (GetBotChannelAssociations -> GetBotChannelAssociations -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GetBotChannelAssociations -> GetBotChannelAssociations -> Bool
$c/= :: GetBotChannelAssociations -> GetBotChannelAssociations -> Bool
== :: GetBotChannelAssociations -> GetBotChannelAssociations -> Bool
$c== :: GetBotChannelAssociations -> GetBotChannelAssociations -> Bool
Prelude.Eq, ReadPrec [GetBotChannelAssociations]
ReadPrec GetBotChannelAssociations
Int -> ReadS GetBotChannelAssociations
ReadS [GetBotChannelAssociations]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [GetBotChannelAssociations]
$creadListPrec :: ReadPrec [GetBotChannelAssociations]
readPrec :: ReadPrec GetBotChannelAssociations
$creadPrec :: ReadPrec GetBotChannelAssociations
readList :: ReadS [GetBotChannelAssociations]
$creadList :: ReadS [GetBotChannelAssociations]
readsPrec :: Int -> ReadS GetBotChannelAssociations
$creadsPrec :: Int -> ReadS GetBotChannelAssociations
Prelude.Read, Int -> GetBotChannelAssociations -> ShowS
[GetBotChannelAssociations] -> ShowS
GetBotChannelAssociations -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GetBotChannelAssociations] -> ShowS
$cshowList :: [GetBotChannelAssociations] -> ShowS
show :: GetBotChannelAssociations -> String
$cshow :: GetBotChannelAssociations -> String
showsPrec :: Int -> GetBotChannelAssociations -> ShowS
$cshowsPrec :: Int -> GetBotChannelAssociations -> ShowS
Prelude.Show, forall x.
Rep GetBotChannelAssociations x -> GetBotChannelAssociations
forall x.
GetBotChannelAssociations -> Rep GetBotChannelAssociations x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep GetBotChannelAssociations x -> GetBotChannelAssociations
$cfrom :: forall x.
GetBotChannelAssociations -> Rep GetBotChannelAssociations x
Prelude.Generic)
newGetBotChannelAssociations ::
Prelude.Text ->
Prelude.Text ->
GetBotChannelAssociations
newGetBotChannelAssociations :: Text -> Text -> GetBotChannelAssociations
newGetBotChannelAssociations Text
pBotName_ Text
pBotAlias_ =
GetBotChannelAssociations'
{ $sel:maxResults:GetBotChannelAssociations' :: Maybe Natural
maxResults =
forall a. Maybe a
Prelude.Nothing,
$sel:nameContains:GetBotChannelAssociations' :: Maybe Text
nameContains = forall a. Maybe a
Prelude.Nothing,
$sel:nextToken:GetBotChannelAssociations' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing,
$sel:botName:GetBotChannelAssociations' :: Text
botName = Text
pBotName_,
$sel:botAlias:GetBotChannelAssociations' :: Text
botAlias = Text
pBotAlias_
}
getBotChannelAssociations_maxResults :: Lens.Lens' GetBotChannelAssociations (Prelude.Maybe Prelude.Natural)
getBotChannelAssociations_maxResults :: Lens' GetBotChannelAssociations (Maybe Natural)
getBotChannelAssociations_maxResults = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetBotChannelAssociations' {Maybe Natural
maxResults :: Maybe Natural
$sel:maxResults:GetBotChannelAssociations' :: GetBotChannelAssociations -> Maybe Natural
maxResults} -> Maybe Natural
maxResults) (\s :: GetBotChannelAssociations
s@GetBotChannelAssociations' {} Maybe Natural
a -> GetBotChannelAssociations
s {$sel:maxResults:GetBotChannelAssociations' :: Maybe Natural
maxResults = Maybe Natural
a} :: GetBotChannelAssociations)
getBotChannelAssociations_nameContains :: Lens.Lens' GetBotChannelAssociations (Prelude.Maybe Prelude.Text)
getBotChannelAssociations_nameContains :: Lens' GetBotChannelAssociations (Maybe Text)
getBotChannelAssociations_nameContains = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetBotChannelAssociations' {Maybe Text
nameContains :: Maybe Text
$sel:nameContains:GetBotChannelAssociations' :: GetBotChannelAssociations -> Maybe Text
nameContains} -> Maybe Text
nameContains) (\s :: GetBotChannelAssociations
s@GetBotChannelAssociations' {} Maybe Text
a -> GetBotChannelAssociations
s {$sel:nameContains:GetBotChannelAssociations' :: Maybe Text
nameContains = Maybe Text
a} :: GetBotChannelAssociations)
getBotChannelAssociations_nextToken :: Lens.Lens' GetBotChannelAssociations (Prelude.Maybe Prelude.Text)
getBotChannelAssociations_nextToken :: Lens' GetBotChannelAssociations (Maybe Text)
getBotChannelAssociations_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetBotChannelAssociations' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:GetBotChannelAssociations' :: GetBotChannelAssociations -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: GetBotChannelAssociations
s@GetBotChannelAssociations' {} Maybe Text
a -> GetBotChannelAssociations
s {$sel:nextToken:GetBotChannelAssociations' :: Maybe Text
nextToken = Maybe Text
a} :: GetBotChannelAssociations)
getBotChannelAssociations_botName :: Lens.Lens' GetBotChannelAssociations Prelude.Text
getBotChannelAssociations_botName :: Lens' GetBotChannelAssociations Text
getBotChannelAssociations_botName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetBotChannelAssociations' {Text
botName :: Text
$sel:botName:GetBotChannelAssociations' :: GetBotChannelAssociations -> Text
botName} -> Text
botName) (\s :: GetBotChannelAssociations
s@GetBotChannelAssociations' {} Text
a -> GetBotChannelAssociations
s {$sel:botName:GetBotChannelAssociations' :: Text
botName = Text
a} :: GetBotChannelAssociations)
getBotChannelAssociations_botAlias :: Lens.Lens' GetBotChannelAssociations Prelude.Text
getBotChannelAssociations_botAlias :: Lens' GetBotChannelAssociations Text
getBotChannelAssociations_botAlias = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetBotChannelAssociations' {Text
botAlias :: Text
$sel:botAlias:GetBotChannelAssociations' :: GetBotChannelAssociations -> Text
botAlias} -> Text
botAlias) (\s :: GetBotChannelAssociations
s@GetBotChannelAssociations' {} Text
a -> GetBotChannelAssociations
s {$sel:botAlias:GetBotChannelAssociations' :: Text
botAlias = Text
a} :: GetBotChannelAssociations)
instance Core.AWSPager GetBotChannelAssociations where
page :: GetBotChannelAssociations
-> AWSResponse GetBotChannelAssociations
-> Maybe GetBotChannelAssociations
page GetBotChannelAssociations
rq AWSResponse GetBotChannelAssociations
rs
| forall a. AWSTruncated a => a -> Bool
Core.stop
( AWSResponse GetBotChannelAssociations
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' GetBotChannelAssociationsResponse (Maybe Text)
getBotChannelAssociationsResponse_nextToken
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall a b. Prism (Maybe a) (Maybe b) a b
Lens._Just
) =
forall a. Maybe a
Prelude.Nothing
| forall a. AWSTruncated a => a -> Bool
Core.stop
( AWSResponse GetBotChannelAssociations
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens'
GetBotChannelAssociationsResponse (Maybe [BotChannelAssociation])
getBotChannelAssociationsResponse_botChannelAssociations
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall a b. Prism (Maybe a) (Maybe b) a b
Lens._Just
) =
forall a. Maybe a
Prelude.Nothing
| Bool
Prelude.otherwise =
forall a. a -> Maybe a
Prelude.Just
forall a b. (a -> b) -> a -> b
Prelude.$ GetBotChannelAssociations
rq
forall a b. a -> (a -> b) -> b
Prelude.& Lens' GetBotChannelAssociations (Maybe Text)
getBotChannelAssociations_nextToken
forall s t a b. ASetter s t a b -> b -> s -> t
Lens..~ AWSResponse GetBotChannelAssociations
rs
forall s a. s -> Getting (First a) s a -> Maybe a
Lens.^? Lens' GetBotChannelAssociationsResponse (Maybe Text)
getBotChannelAssociationsResponse_nextToken
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall a b. Prism (Maybe a) (Maybe b) a b
Lens._Just
instance Core.AWSRequest GetBotChannelAssociations where
type
AWSResponse GetBotChannelAssociations =
GetBotChannelAssociationsResponse
request :: (Service -> Service)
-> GetBotChannelAssociations -> Request GetBotChannelAssociations
request Service -> Service
overrides =
forall a. ToRequest a => Service -> a -> Request a
Request.get (Service -> Service
overrides Service
defaultService)
response :: forall (m :: * -> *).
MonadResource m =>
(ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy GetBotChannelAssociations
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse GetBotChannelAssociations)))
response =
forall (m :: * -> *) a.
MonadResource m =>
(Int -> ResponseHeaders -> Object -> Either String (AWSResponse a))
-> (ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy a
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse a)))
Response.receiveJSON
( \Int
s ResponseHeaders
h Object
x ->
Maybe [BotChannelAssociation]
-> Maybe Text -> Int -> GetBotChannelAssociationsResponse
GetBotChannelAssociationsResponse'
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> ( Object
x
forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"botChannelAssociations"
forall (f :: * -> *) a. Functor f => f (Maybe a) -> a -> f a
Core..!@ forall a. Monoid a => a
Prelude.mempty
)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"nextToken")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure (forall a. Enum a => a -> Int
Prelude.fromEnum Int
s))
)
instance Prelude.Hashable GetBotChannelAssociations where
hashWithSalt :: Int -> GetBotChannelAssociations -> Int
hashWithSalt Int
_salt GetBotChannelAssociations' {Maybe Natural
Maybe Text
Text
botAlias :: Text
botName :: Text
nextToken :: Maybe Text
nameContains :: Maybe Text
maxResults :: Maybe Natural
$sel:botAlias:GetBotChannelAssociations' :: GetBotChannelAssociations -> Text
$sel:botName:GetBotChannelAssociations' :: GetBotChannelAssociations -> Text
$sel:nextToken:GetBotChannelAssociations' :: GetBotChannelAssociations -> Maybe Text
$sel:nameContains:GetBotChannelAssociations' :: GetBotChannelAssociations -> Maybe Text
$sel:maxResults:GetBotChannelAssociations' :: GetBotChannelAssociations -> Maybe Natural
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Natural
maxResults
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
nameContains
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
nextToken
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
botName
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
botAlias
instance Prelude.NFData GetBotChannelAssociations where
rnf :: GetBotChannelAssociations -> ()
rnf GetBotChannelAssociations' {Maybe Natural
Maybe Text
Text
botAlias :: Text
botName :: Text
nextToken :: Maybe Text
nameContains :: Maybe Text
maxResults :: Maybe Natural
$sel:botAlias:GetBotChannelAssociations' :: GetBotChannelAssociations -> Text
$sel:botName:GetBotChannelAssociations' :: GetBotChannelAssociations -> Text
$sel:nextToken:GetBotChannelAssociations' :: GetBotChannelAssociations -> Maybe Text
$sel:nameContains:GetBotChannelAssociations' :: GetBotChannelAssociations -> Maybe Text
$sel:maxResults:GetBotChannelAssociations' :: GetBotChannelAssociations -> Maybe Natural
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Natural
maxResults
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
nameContains
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
nextToken
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
botName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
botAlias
instance Data.ToHeaders GetBotChannelAssociations where
toHeaders :: GetBotChannelAssociations -> ResponseHeaders
toHeaders =
forall a b. a -> b -> a
Prelude.const
( forall a. Monoid a => [a] -> a
Prelude.mconcat
[ HeaderName
"Content-Type"
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# ( ByteString
"application/x-amz-json-1.1" ::
Prelude.ByteString
)
]
)
instance Data.ToPath GetBotChannelAssociations where
toPath :: GetBotChannelAssociations -> ByteString
toPath GetBotChannelAssociations' {Maybe Natural
Maybe Text
Text
botAlias :: Text
botName :: Text
nextToken :: Maybe Text
nameContains :: Maybe Text
maxResults :: Maybe Natural
$sel:botAlias:GetBotChannelAssociations' :: GetBotChannelAssociations -> Text
$sel:botName:GetBotChannelAssociations' :: GetBotChannelAssociations -> Text
$sel:nextToken:GetBotChannelAssociations' :: GetBotChannelAssociations -> Maybe Text
$sel:nameContains:GetBotChannelAssociations' :: GetBotChannelAssociations -> Maybe Text
$sel:maxResults:GetBotChannelAssociations' :: GetBotChannelAssociations -> Maybe Natural
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ ByteString
"/bots/",
forall a. ToByteString a => a -> ByteString
Data.toBS Text
botName,
ByteString
"/aliases/",
forall a. ToByteString a => a -> ByteString
Data.toBS Text
botAlias,
ByteString
"/channels/"
]
instance Data.ToQuery GetBotChannelAssociations where
toQuery :: GetBotChannelAssociations -> QueryString
toQuery GetBotChannelAssociations' {Maybe Natural
Maybe Text
Text
botAlias :: Text
botName :: Text
nextToken :: Maybe Text
nameContains :: Maybe Text
maxResults :: Maybe Natural
$sel:botAlias:GetBotChannelAssociations' :: GetBotChannelAssociations -> Text
$sel:botName:GetBotChannelAssociations' :: GetBotChannelAssociations -> Text
$sel:nextToken:GetBotChannelAssociations' :: GetBotChannelAssociations -> Maybe Text
$sel:nameContains:GetBotChannelAssociations' :: GetBotChannelAssociations -> Maybe Text
$sel:maxResults:GetBotChannelAssociations' :: GetBotChannelAssociations -> Maybe Natural
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ ByteString
"maxResults" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Natural
maxResults,
ByteString
"nameContains" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
nameContains,
ByteString
"nextToken" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
nextToken
]
data GetBotChannelAssociationsResponse = GetBotChannelAssociationsResponse'
{
GetBotChannelAssociationsResponse -> Maybe [BotChannelAssociation]
botChannelAssociations :: Prelude.Maybe [BotChannelAssociation],
GetBotChannelAssociationsResponse -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
GetBotChannelAssociationsResponse -> Int
httpStatus :: Prelude.Int
}
deriving (GetBotChannelAssociationsResponse
-> GetBotChannelAssociationsResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: GetBotChannelAssociationsResponse
-> GetBotChannelAssociationsResponse -> Bool
$c/= :: GetBotChannelAssociationsResponse
-> GetBotChannelAssociationsResponse -> Bool
== :: GetBotChannelAssociationsResponse
-> GetBotChannelAssociationsResponse -> Bool
$c== :: GetBotChannelAssociationsResponse
-> GetBotChannelAssociationsResponse -> Bool
Prelude.Eq, Int -> GetBotChannelAssociationsResponse -> ShowS
[GetBotChannelAssociationsResponse] -> ShowS
GetBotChannelAssociationsResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [GetBotChannelAssociationsResponse] -> ShowS
$cshowList :: [GetBotChannelAssociationsResponse] -> ShowS
show :: GetBotChannelAssociationsResponse -> String
$cshow :: GetBotChannelAssociationsResponse -> String
showsPrec :: Int -> GetBotChannelAssociationsResponse -> ShowS
$cshowsPrec :: Int -> GetBotChannelAssociationsResponse -> ShowS
Prelude.Show, forall x.
Rep GetBotChannelAssociationsResponse x
-> GetBotChannelAssociationsResponse
forall x.
GetBotChannelAssociationsResponse
-> Rep GetBotChannelAssociationsResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep GetBotChannelAssociationsResponse x
-> GetBotChannelAssociationsResponse
$cfrom :: forall x.
GetBotChannelAssociationsResponse
-> Rep GetBotChannelAssociationsResponse x
Prelude.Generic)
newGetBotChannelAssociationsResponse ::
Prelude.Int ->
GetBotChannelAssociationsResponse
newGetBotChannelAssociationsResponse :: Int -> GetBotChannelAssociationsResponse
newGetBotChannelAssociationsResponse Int
pHttpStatus_ =
GetBotChannelAssociationsResponse'
{ $sel:botChannelAssociations:GetBotChannelAssociationsResponse' :: Maybe [BotChannelAssociation]
botChannelAssociations =
forall a. Maybe a
Prelude.Nothing,
$sel:nextToken:GetBotChannelAssociationsResponse' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:GetBotChannelAssociationsResponse' :: Int
httpStatus = Int
pHttpStatus_
}
getBotChannelAssociationsResponse_botChannelAssociations :: Lens.Lens' GetBotChannelAssociationsResponse (Prelude.Maybe [BotChannelAssociation])
getBotChannelAssociationsResponse_botChannelAssociations :: Lens'
GetBotChannelAssociationsResponse (Maybe [BotChannelAssociation])
getBotChannelAssociationsResponse_botChannelAssociations = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetBotChannelAssociationsResponse' {Maybe [BotChannelAssociation]
botChannelAssociations :: Maybe [BotChannelAssociation]
$sel:botChannelAssociations:GetBotChannelAssociationsResponse' :: GetBotChannelAssociationsResponse -> Maybe [BotChannelAssociation]
botChannelAssociations} -> Maybe [BotChannelAssociation]
botChannelAssociations) (\s :: GetBotChannelAssociationsResponse
s@GetBotChannelAssociationsResponse' {} Maybe [BotChannelAssociation]
a -> GetBotChannelAssociationsResponse
s {$sel:botChannelAssociations:GetBotChannelAssociationsResponse' :: Maybe [BotChannelAssociation]
botChannelAssociations = Maybe [BotChannelAssociation]
a} :: GetBotChannelAssociationsResponse) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
getBotChannelAssociationsResponse_nextToken :: Lens.Lens' GetBotChannelAssociationsResponse (Prelude.Maybe Prelude.Text)
getBotChannelAssociationsResponse_nextToken :: Lens' GetBotChannelAssociationsResponse (Maybe Text)
getBotChannelAssociationsResponse_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetBotChannelAssociationsResponse' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:GetBotChannelAssociationsResponse' :: GetBotChannelAssociationsResponse -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: GetBotChannelAssociationsResponse
s@GetBotChannelAssociationsResponse' {} Maybe Text
a -> GetBotChannelAssociationsResponse
s {$sel:nextToken:GetBotChannelAssociationsResponse' :: Maybe Text
nextToken = Maybe Text
a} :: GetBotChannelAssociationsResponse)
getBotChannelAssociationsResponse_httpStatus :: Lens.Lens' GetBotChannelAssociationsResponse Prelude.Int
getBotChannelAssociationsResponse_httpStatus :: Lens' GetBotChannelAssociationsResponse Int
getBotChannelAssociationsResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\GetBotChannelAssociationsResponse' {Int
httpStatus :: Int
$sel:httpStatus:GetBotChannelAssociationsResponse' :: GetBotChannelAssociationsResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: GetBotChannelAssociationsResponse
s@GetBotChannelAssociationsResponse' {} Int
a -> GetBotChannelAssociationsResponse
s {$sel:httpStatus:GetBotChannelAssociationsResponse' :: Int
httpStatus = Int
a} :: GetBotChannelAssociationsResponse)
instance
Prelude.NFData
GetBotChannelAssociationsResponse
where
rnf :: GetBotChannelAssociationsResponse -> ()
rnf GetBotChannelAssociationsResponse' {Int
Maybe [BotChannelAssociation]
Maybe Text
httpStatus :: Int
nextToken :: Maybe Text
botChannelAssociations :: Maybe [BotChannelAssociation]
$sel:httpStatus:GetBotChannelAssociationsResponse' :: GetBotChannelAssociationsResponse -> Int
$sel:nextToken:GetBotChannelAssociationsResponse' :: GetBotChannelAssociationsResponse -> Maybe Text
$sel:botChannelAssociations:GetBotChannelAssociationsResponse' :: GetBotChannelAssociationsResponse -> Maybe [BotChannelAssociation]
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe [BotChannelAssociation]
botChannelAssociations
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
nextToken
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus