{-# 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 #-}

-- Derived from AWS service descriptions, licensed under Apache 2.0.

-- |
-- Module      : Amazonka.ImageBuilder.ListImagePackages
-- Copyright   : (c) 2013-2023 Brendan Hay
-- License     : Mozilla Public License, v. 2.0.
-- Maintainer  : Brendan Hay
-- Stability   : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- List the Packages that are associated with an Image Build Version, as
-- determined by Amazon Web Services Systems Manager Inventory at build
-- time.
module Amazonka.ImageBuilder.ListImagePackages
  ( -- * Creating a Request
    ListImagePackages (..),
    newListImagePackages,

    -- * Request Lenses
    listImagePackages_maxResults,
    listImagePackages_nextToken,
    listImagePackages_imageBuildVersionArn,

    -- * Destructuring the Response
    ListImagePackagesResponse (..),
    newListImagePackagesResponse,

    -- * Response Lenses
    listImagePackagesResponse_imagePackageList,
    listImagePackagesResponse_nextToken,
    listImagePackagesResponse_requestId,
    listImagePackagesResponse_httpStatus,
  )
where

import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import Amazonka.ImageBuilder.Types
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response

-- | /See:/ 'newListImagePackages' smart constructor.
data ListImagePackages = ListImagePackages'
  { -- | The maxiumum number of results to return from the ListImagePackages
    -- request.
    ListImagePackages -> Maybe Natural
maxResults :: Prelude.Maybe Prelude.Natural,
    -- | A token to specify where to start paginating. This is the NextToken from
    -- a previously truncated response.
    ListImagePackages -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
    -- | Filter results for the ListImagePackages request by the Image Build
    -- Version ARN
    ListImagePackages -> Text
imageBuildVersionArn :: Prelude.Text
  }
  deriving (ListImagePackages -> ListImagePackages -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ListImagePackages -> ListImagePackages -> Bool
$c/= :: ListImagePackages -> ListImagePackages -> Bool
== :: ListImagePackages -> ListImagePackages -> Bool
$c== :: ListImagePackages -> ListImagePackages -> Bool
Prelude.Eq, ReadPrec [ListImagePackages]
ReadPrec ListImagePackages
Int -> ReadS ListImagePackages
ReadS [ListImagePackages]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ListImagePackages]
$creadListPrec :: ReadPrec [ListImagePackages]
readPrec :: ReadPrec ListImagePackages
$creadPrec :: ReadPrec ListImagePackages
readList :: ReadS [ListImagePackages]
$creadList :: ReadS [ListImagePackages]
readsPrec :: Int -> ReadS ListImagePackages
$creadsPrec :: Int -> ReadS ListImagePackages
Prelude.Read, Int -> ListImagePackages -> ShowS
[ListImagePackages] -> ShowS
ListImagePackages -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ListImagePackages] -> ShowS
$cshowList :: [ListImagePackages] -> ShowS
show :: ListImagePackages -> String
$cshow :: ListImagePackages -> String
showsPrec :: Int -> ListImagePackages -> ShowS
$cshowsPrec :: Int -> ListImagePackages -> ShowS
Prelude.Show, forall x. Rep ListImagePackages x -> ListImagePackages
forall x. ListImagePackages -> Rep ListImagePackages x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ListImagePackages x -> ListImagePackages
$cfrom :: forall x. ListImagePackages -> Rep ListImagePackages x
Prelude.Generic)

-- |
-- Create a value of 'ListImagePackages' with all optional fields omitted.
--
-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.
--
-- The following record fields are available, with the corresponding lenses provided
-- for backwards compatibility:
--
-- 'maxResults', 'listImagePackages_maxResults' - The maxiumum number of results to return from the ListImagePackages
-- request.
--
-- 'nextToken', 'listImagePackages_nextToken' - A token to specify where to start paginating. This is the NextToken from
-- a previously truncated response.
--
-- 'imageBuildVersionArn', 'listImagePackages_imageBuildVersionArn' - Filter results for the ListImagePackages request by the Image Build
-- Version ARN
newListImagePackages ::
  -- | 'imageBuildVersionArn'
  Prelude.Text ->
  ListImagePackages
newListImagePackages :: Text -> ListImagePackages
newListImagePackages Text
pImageBuildVersionArn_ =
  ListImagePackages'
    { $sel:maxResults:ListImagePackages' :: Maybe Natural
maxResults = forall a. Maybe a
Prelude.Nothing,
      $sel:nextToken:ListImagePackages' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing,
      $sel:imageBuildVersionArn:ListImagePackages' :: Text
imageBuildVersionArn = Text
pImageBuildVersionArn_
    }

-- | The maxiumum number of results to return from the ListImagePackages
-- request.
listImagePackages_maxResults :: Lens.Lens' ListImagePackages (Prelude.Maybe Prelude.Natural)
listImagePackages_maxResults :: Lens' ListImagePackages (Maybe Natural)
listImagePackages_maxResults = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListImagePackages' {Maybe Natural
maxResults :: Maybe Natural
$sel:maxResults:ListImagePackages' :: ListImagePackages -> Maybe Natural
maxResults} -> Maybe Natural
maxResults) (\s :: ListImagePackages
s@ListImagePackages' {} Maybe Natural
a -> ListImagePackages
s {$sel:maxResults:ListImagePackages' :: Maybe Natural
maxResults = Maybe Natural
a} :: ListImagePackages)

-- | A token to specify where to start paginating. This is the NextToken from
-- a previously truncated response.
listImagePackages_nextToken :: Lens.Lens' ListImagePackages (Prelude.Maybe Prelude.Text)
listImagePackages_nextToken :: Lens' ListImagePackages (Maybe Text)
listImagePackages_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListImagePackages' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:ListImagePackages' :: ListImagePackages -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: ListImagePackages
s@ListImagePackages' {} Maybe Text
a -> ListImagePackages
s {$sel:nextToken:ListImagePackages' :: Maybe Text
nextToken = Maybe Text
a} :: ListImagePackages)

-- | Filter results for the ListImagePackages request by the Image Build
-- Version ARN
listImagePackages_imageBuildVersionArn :: Lens.Lens' ListImagePackages Prelude.Text
listImagePackages_imageBuildVersionArn :: Lens' ListImagePackages Text
listImagePackages_imageBuildVersionArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListImagePackages' {Text
imageBuildVersionArn :: Text
$sel:imageBuildVersionArn:ListImagePackages' :: ListImagePackages -> Text
imageBuildVersionArn} -> Text
imageBuildVersionArn) (\s :: ListImagePackages
s@ListImagePackages' {} Text
a -> ListImagePackages
s {$sel:imageBuildVersionArn:ListImagePackages' :: Text
imageBuildVersionArn = Text
a} :: ListImagePackages)

instance Core.AWSRequest ListImagePackages where
  type
    AWSResponse ListImagePackages =
      ListImagePackagesResponse
  request :: (Service -> Service)
-> ListImagePackages -> Request ListImagePackages
request Service -> Service
overrides =
    forall a. (ToRequest a, ToJSON a) => Service -> a -> Request a
Request.postJSON (Service -> Service
overrides Service
defaultService)
  response :: forall (m :: * -> *).
MonadResource m =>
(ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy ListImagePackages
-> ClientResponse ClientBody
-> m (Either
        Error (ClientResponse (AWSResponse ListImagePackages)))
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 [ImagePackage]
-> Maybe Text -> Maybe Text -> Int -> ListImagePackagesResponse
ListImagePackagesResponse'
            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
"imagePackageList"
                            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.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"requestId")
            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 ListImagePackages where
  hashWithSalt :: Int -> ListImagePackages -> Int
hashWithSalt Int
_salt ListImagePackages' {Maybe Natural
Maybe Text
Text
imageBuildVersionArn :: Text
nextToken :: Maybe Text
maxResults :: Maybe Natural
$sel:imageBuildVersionArn:ListImagePackages' :: ListImagePackages -> Text
$sel:nextToken:ListImagePackages' :: ListImagePackages -> Maybe Text
$sel:maxResults:ListImagePackages' :: ListImagePackages -> 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
nextToken
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
imageBuildVersionArn

instance Prelude.NFData ListImagePackages where
  rnf :: ListImagePackages -> ()
rnf ListImagePackages' {Maybe Natural
Maybe Text
Text
imageBuildVersionArn :: Text
nextToken :: Maybe Text
maxResults :: Maybe Natural
$sel:imageBuildVersionArn:ListImagePackages' :: ListImagePackages -> Text
$sel:nextToken:ListImagePackages' :: ListImagePackages -> Maybe Text
$sel:maxResults:ListImagePackages' :: ListImagePackages -> 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
nextToken
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
imageBuildVersionArn

instance Data.ToHeaders ListImagePackages where
  toHeaders :: ListImagePackages -> 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.ToJSON ListImagePackages where
  toJSON :: ListImagePackages -> Value
toJSON ListImagePackages' {Maybe Natural
Maybe Text
Text
imageBuildVersionArn :: Text
nextToken :: Maybe Text
maxResults :: Maybe Natural
$sel:imageBuildVersionArn:ListImagePackages' :: ListImagePackages -> Text
$sel:nextToken:ListImagePackages' :: ListImagePackages -> Maybe Text
$sel:maxResults:ListImagePackages' :: ListImagePackages -> Maybe Natural
..} =
    [Pair] -> Value
Data.object
      ( forall a. [Maybe a] -> [a]
Prelude.catMaybes
          [ (Key
"maxResults" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Natural
maxResults,
            (Key
"nextToken" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
nextToken,
            forall a. a -> Maybe a
Prelude.Just
              ( Key
"imageBuildVersionArn"
                  forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
imageBuildVersionArn
              )
          ]
      )

instance Data.ToPath ListImagePackages where
  toPath :: ListImagePackages -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/ListImagePackages"

instance Data.ToQuery ListImagePackages where
  toQuery :: ListImagePackages -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty

-- | /See:/ 'newListImagePackagesResponse' smart constructor.
data ListImagePackagesResponse = ListImagePackagesResponse'
  { -- | The list of Image Packages returned in the response.
    ListImagePackagesResponse -> Maybe [ImagePackage]
imagePackageList :: Prelude.Maybe [ImagePackage],
    -- | A token to specify where to start paginating. This is the NextToken from
    -- a previously truncated response.
    ListImagePackagesResponse -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
    -- | The request ID that uniquely identifies this request.
    ListImagePackagesResponse -> Maybe Text
requestId :: Prelude.Maybe Prelude.Text,
    -- | The response's http status code.
    ListImagePackagesResponse -> Int
httpStatus :: Prelude.Int
  }
  deriving (ListImagePackagesResponse -> ListImagePackagesResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ListImagePackagesResponse -> ListImagePackagesResponse -> Bool
$c/= :: ListImagePackagesResponse -> ListImagePackagesResponse -> Bool
== :: ListImagePackagesResponse -> ListImagePackagesResponse -> Bool
$c== :: ListImagePackagesResponse -> ListImagePackagesResponse -> Bool
Prelude.Eq, ReadPrec [ListImagePackagesResponse]
ReadPrec ListImagePackagesResponse
Int -> ReadS ListImagePackagesResponse
ReadS [ListImagePackagesResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ListImagePackagesResponse]
$creadListPrec :: ReadPrec [ListImagePackagesResponse]
readPrec :: ReadPrec ListImagePackagesResponse
$creadPrec :: ReadPrec ListImagePackagesResponse
readList :: ReadS [ListImagePackagesResponse]
$creadList :: ReadS [ListImagePackagesResponse]
readsPrec :: Int -> ReadS ListImagePackagesResponse
$creadsPrec :: Int -> ReadS ListImagePackagesResponse
Prelude.Read, Int -> ListImagePackagesResponse -> ShowS
[ListImagePackagesResponse] -> ShowS
ListImagePackagesResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ListImagePackagesResponse] -> ShowS
$cshowList :: [ListImagePackagesResponse] -> ShowS
show :: ListImagePackagesResponse -> String
$cshow :: ListImagePackagesResponse -> String
showsPrec :: Int -> ListImagePackagesResponse -> ShowS
$cshowsPrec :: Int -> ListImagePackagesResponse -> ShowS
Prelude.Show, forall x.
Rep ListImagePackagesResponse x -> ListImagePackagesResponse
forall x.
ListImagePackagesResponse -> Rep ListImagePackagesResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ListImagePackagesResponse x -> ListImagePackagesResponse
$cfrom :: forall x.
ListImagePackagesResponse -> Rep ListImagePackagesResponse x
Prelude.Generic)

-- |
-- Create a value of 'ListImagePackagesResponse' with all optional fields omitted.
--
-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.
--
-- The following record fields are available, with the corresponding lenses provided
-- for backwards compatibility:
--
-- 'imagePackageList', 'listImagePackagesResponse_imagePackageList' - The list of Image Packages returned in the response.
--
-- 'nextToken', 'listImagePackagesResponse_nextToken' - A token to specify where to start paginating. This is the NextToken from
-- a previously truncated response.
--
-- 'requestId', 'listImagePackagesResponse_requestId' - The request ID that uniquely identifies this request.
--
-- 'httpStatus', 'listImagePackagesResponse_httpStatus' - The response's http status code.
newListImagePackagesResponse ::
  -- | 'httpStatus'
  Prelude.Int ->
  ListImagePackagesResponse
newListImagePackagesResponse :: Int -> ListImagePackagesResponse
newListImagePackagesResponse Int
pHttpStatus_ =
  ListImagePackagesResponse'
    { $sel:imagePackageList:ListImagePackagesResponse' :: Maybe [ImagePackage]
imagePackageList =
        forall a. Maybe a
Prelude.Nothing,
      $sel:nextToken:ListImagePackagesResponse' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing,
      $sel:requestId:ListImagePackagesResponse' :: Maybe Text
requestId = forall a. Maybe a
Prelude.Nothing,
      $sel:httpStatus:ListImagePackagesResponse' :: Int
httpStatus = Int
pHttpStatus_
    }

-- | The list of Image Packages returned in the response.
listImagePackagesResponse_imagePackageList :: Lens.Lens' ListImagePackagesResponse (Prelude.Maybe [ImagePackage])
listImagePackagesResponse_imagePackageList :: Lens' ListImagePackagesResponse (Maybe [ImagePackage])
listImagePackagesResponse_imagePackageList = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListImagePackagesResponse' {Maybe [ImagePackage]
imagePackageList :: Maybe [ImagePackage]
$sel:imagePackageList:ListImagePackagesResponse' :: ListImagePackagesResponse -> Maybe [ImagePackage]
imagePackageList} -> Maybe [ImagePackage]
imagePackageList) (\s :: ListImagePackagesResponse
s@ListImagePackagesResponse' {} Maybe [ImagePackage]
a -> ListImagePackagesResponse
s {$sel:imagePackageList:ListImagePackagesResponse' :: Maybe [ImagePackage]
imagePackageList = Maybe [ImagePackage]
a} :: ListImagePackagesResponse) 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

-- | A token to specify where to start paginating. This is the NextToken from
-- a previously truncated response.
listImagePackagesResponse_nextToken :: Lens.Lens' ListImagePackagesResponse (Prelude.Maybe Prelude.Text)
listImagePackagesResponse_nextToken :: Lens' ListImagePackagesResponse (Maybe Text)
listImagePackagesResponse_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListImagePackagesResponse' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:ListImagePackagesResponse' :: ListImagePackagesResponse -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: ListImagePackagesResponse
s@ListImagePackagesResponse' {} Maybe Text
a -> ListImagePackagesResponse
s {$sel:nextToken:ListImagePackagesResponse' :: Maybe Text
nextToken = Maybe Text
a} :: ListImagePackagesResponse)

-- | The request ID that uniquely identifies this request.
listImagePackagesResponse_requestId :: Lens.Lens' ListImagePackagesResponse (Prelude.Maybe Prelude.Text)
listImagePackagesResponse_requestId :: Lens' ListImagePackagesResponse (Maybe Text)
listImagePackagesResponse_requestId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListImagePackagesResponse' {Maybe Text
requestId :: Maybe Text
$sel:requestId:ListImagePackagesResponse' :: ListImagePackagesResponse -> Maybe Text
requestId} -> Maybe Text
requestId) (\s :: ListImagePackagesResponse
s@ListImagePackagesResponse' {} Maybe Text
a -> ListImagePackagesResponse
s {$sel:requestId:ListImagePackagesResponse' :: Maybe Text
requestId = Maybe Text
a} :: ListImagePackagesResponse)

-- | The response's http status code.
listImagePackagesResponse_httpStatus :: Lens.Lens' ListImagePackagesResponse Prelude.Int
listImagePackagesResponse_httpStatus :: Lens' ListImagePackagesResponse Int
listImagePackagesResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ListImagePackagesResponse' {Int
httpStatus :: Int
$sel:httpStatus:ListImagePackagesResponse' :: ListImagePackagesResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: ListImagePackagesResponse
s@ListImagePackagesResponse' {} Int
a -> ListImagePackagesResponse
s {$sel:httpStatus:ListImagePackagesResponse' :: Int
httpStatus = Int
a} :: ListImagePackagesResponse)

instance Prelude.NFData ListImagePackagesResponse where
  rnf :: ListImagePackagesResponse -> ()
rnf ListImagePackagesResponse' {Int
Maybe [ImagePackage]
Maybe Text
httpStatus :: Int
requestId :: Maybe Text
nextToken :: Maybe Text
imagePackageList :: Maybe [ImagePackage]
$sel:httpStatus:ListImagePackagesResponse' :: ListImagePackagesResponse -> Int
$sel:requestId:ListImagePackagesResponse' :: ListImagePackagesResponse -> Maybe Text
$sel:nextToken:ListImagePackagesResponse' :: ListImagePackagesResponse -> Maybe Text
$sel:imagePackageList:ListImagePackagesResponse' :: ListImagePackagesResponse -> Maybe [ImagePackage]
..} =
    forall a. NFData a => a -> ()
Prelude.rnf Maybe [ImagePackage]
imagePackageList
      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 Maybe Text
requestId
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus