{-# 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.CodeCommit.Types.RepositoryMetadata where
import qualified Amazonka.Core as Core
import qualified Amazonka.Lens as Lens
import qualified Amazonka.Prelude as Prelude
data RepositoryMetadata = RepositoryMetadata'
{
RepositoryMetadata -> Maybe Text
repositoryDescription :: Prelude.Maybe Prelude.Text,
RepositoryMetadata -> Maybe POSIX
lastModifiedDate :: Prelude.Maybe Core.POSIX,
RepositoryMetadata -> Maybe Text
arn :: Prelude.Maybe Prelude.Text,
RepositoryMetadata -> Maybe Text
cloneUrlHttp :: Prelude.Maybe Prelude.Text,
RepositoryMetadata -> Maybe Text
accountId :: Prelude.Maybe Prelude.Text,
RepositoryMetadata -> Maybe Text
defaultBranch :: Prelude.Maybe Prelude.Text,
RepositoryMetadata -> Maybe Text
repositoryId :: Prelude.Maybe Prelude.Text,
RepositoryMetadata -> Maybe Text
repositoryName :: Prelude.Maybe Prelude.Text,
RepositoryMetadata -> Maybe POSIX
creationDate :: Prelude.Maybe Core.POSIX,
RepositoryMetadata -> Maybe Text
cloneUrlSsh :: Prelude.Maybe Prelude.Text
}
deriving (RepositoryMetadata -> RepositoryMetadata -> Bool
(RepositoryMetadata -> RepositoryMetadata -> Bool)
-> (RepositoryMetadata -> RepositoryMetadata -> Bool)
-> Eq RepositoryMetadata
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: RepositoryMetadata -> RepositoryMetadata -> Bool
$c/= :: RepositoryMetadata -> RepositoryMetadata -> Bool
== :: RepositoryMetadata -> RepositoryMetadata -> Bool
$c== :: RepositoryMetadata -> RepositoryMetadata -> Bool
Prelude.Eq, ReadPrec [RepositoryMetadata]
ReadPrec RepositoryMetadata
Int -> ReadS RepositoryMetadata
ReadS [RepositoryMetadata]
(Int -> ReadS RepositoryMetadata)
-> ReadS [RepositoryMetadata]
-> ReadPrec RepositoryMetadata
-> ReadPrec [RepositoryMetadata]
-> Read RepositoryMetadata
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [RepositoryMetadata]
$creadListPrec :: ReadPrec [RepositoryMetadata]
readPrec :: ReadPrec RepositoryMetadata
$creadPrec :: ReadPrec RepositoryMetadata
readList :: ReadS [RepositoryMetadata]
$creadList :: ReadS [RepositoryMetadata]
readsPrec :: Int -> ReadS RepositoryMetadata
$creadsPrec :: Int -> ReadS RepositoryMetadata
Prelude.Read, Int -> RepositoryMetadata -> ShowS
[RepositoryMetadata] -> ShowS
RepositoryMetadata -> String
(Int -> RepositoryMetadata -> ShowS)
-> (RepositoryMetadata -> String)
-> ([RepositoryMetadata] -> ShowS)
-> Show RepositoryMetadata
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [RepositoryMetadata] -> ShowS
$cshowList :: [RepositoryMetadata] -> ShowS
show :: RepositoryMetadata -> String
$cshow :: RepositoryMetadata -> String
showsPrec :: Int -> RepositoryMetadata -> ShowS
$cshowsPrec :: Int -> RepositoryMetadata -> ShowS
Prelude.Show, (forall x. RepositoryMetadata -> Rep RepositoryMetadata x)
-> (forall x. Rep RepositoryMetadata x -> RepositoryMetadata)
-> Generic RepositoryMetadata
forall x. Rep RepositoryMetadata x -> RepositoryMetadata
forall x. RepositoryMetadata -> Rep RepositoryMetadata x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep RepositoryMetadata x -> RepositoryMetadata
$cfrom :: forall x. RepositoryMetadata -> Rep RepositoryMetadata x
Prelude.Generic)
newRepositoryMetadata ::
RepositoryMetadata
newRepositoryMetadata :: RepositoryMetadata
newRepositoryMetadata =
RepositoryMetadata' :: Maybe Text
-> Maybe POSIX
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe POSIX
-> Maybe Text
-> RepositoryMetadata
RepositoryMetadata'
{ $sel:repositoryDescription:RepositoryMetadata' :: Maybe Text
repositoryDescription =
Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:lastModifiedDate:RepositoryMetadata' :: Maybe POSIX
lastModifiedDate = Maybe POSIX
forall a. Maybe a
Prelude.Nothing,
$sel:arn:RepositoryMetadata' :: Maybe Text
arn = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:cloneUrlHttp:RepositoryMetadata' :: Maybe Text
cloneUrlHttp = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:accountId:RepositoryMetadata' :: Maybe Text
accountId = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:defaultBranch:RepositoryMetadata' :: Maybe Text
defaultBranch = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:repositoryId:RepositoryMetadata' :: Maybe Text
repositoryId = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:repositoryName:RepositoryMetadata' :: Maybe Text
repositoryName = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:creationDate:RepositoryMetadata' :: Maybe POSIX
creationDate = Maybe POSIX
forall a. Maybe a
Prelude.Nothing,
$sel:cloneUrlSsh:RepositoryMetadata' :: Maybe Text
cloneUrlSsh = Maybe Text
forall a. Maybe a
Prelude.Nothing
}
repositoryMetadata_repositoryDescription :: Lens.Lens' RepositoryMetadata (Prelude.Maybe Prelude.Text)
repositoryMetadata_repositoryDescription :: (Maybe Text -> f (Maybe Text))
-> RepositoryMetadata -> f RepositoryMetadata
repositoryMetadata_repositoryDescription = (RepositoryMetadata -> Maybe Text)
-> (RepositoryMetadata -> Maybe Text -> RepositoryMetadata)
-> Lens
RepositoryMetadata RepositoryMetadata (Maybe Text) (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RepositoryMetadata' {Maybe Text
repositoryDescription :: Maybe Text
$sel:repositoryDescription:RepositoryMetadata' :: RepositoryMetadata -> Maybe Text
repositoryDescription} -> Maybe Text
repositoryDescription) (\s :: RepositoryMetadata
s@RepositoryMetadata' {} Maybe Text
a -> RepositoryMetadata
s {$sel:repositoryDescription:RepositoryMetadata' :: Maybe Text
repositoryDescription = Maybe Text
a} :: RepositoryMetadata)
repositoryMetadata_lastModifiedDate :: Lens.Lens' RepositoryMetadata (Prelude.Maybe Prelude.UTCTime)
repositoryMetadata_lastModifiedDate :: (Maybe UTCTime -> f (Maybe UTCTime))
-> RepositoryMetadata -> f RepositoryMetadata
repositoryMetadata_lastModifiedDate = (RepositoryMetadata -> Maybe POSIX)
-> (RepositoryMetadata -> Maybe POSIX -> RepositoryMetadata)
-> Lens
RepositoryMetadata RepositoryMetadata (Maybe POSIX) (Maybe POSIX)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RepositoryMetadata' {Maybe POSIX
lastModifiedDate :: Maybe POSIX
$sel:lastModifiedDate:RepositoryMetadata' :: RepositoryMetadata -> Maybe POSIX
lastModifiedDate} -> Maybe POSIX
lastModifiedDate) (\s :: RepositoryMetadata
s@RepositoryMetadata' {} Maybe POSIX
a -> RepositoryMetadata
s {$sel:lastModifiedDate:RepositoryMetadata' :: Maybe POSIX
lastModifiedDate = Maybe POSIX
a} :: RepositoryMetadata) ((Maybe POSIX -> f (Maybe POSIX))
-> RepositoryMetadata -> f RepositoryMetadata)
-> ((Maybe UTCTime -> f (Maybe UTCTime))
-> Maybe POSIX -> f (Maybe POSIX))
-> (Maybe UTCTime -> f (Maybe UTCTime))
-> RepositoryMetadata
-> f RepositoryMetadata
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. AnIso POSIX POSIX UTCTime UTCTime
-> Iso (Maybe POSIX) (Maybe POSIX) (Maybe UTCTime) (Maybe UTCTime)
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 AnIso POSIX POSIX UTCTime UTCTime
forall (a :: Format). Iso' (Time a) UTCTime
Core._Time
repositoryMetadata_arn :: Lens.Lens' RepositoryMetadata (Prelude.Maybe Prelude.Text)
repositoryMetadata_arn :: (Maybe Text -> f (Maybe Text))
-> RepositoryMetadata -> f RepositoryMetadata
repositoryMetadata_arn = (RepositoryMetadata -> Maybe Text)
-> (RepositoryMetadata -> Maybe Text -> RepositoryMetadata)
-> Lens
RepositoryMetadata RepositoryMetadata (Maybe Text) (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RepositoryMetadata' {Maybe Text
arn :: Maybe Text
$sel:arn:RepositoryMetadata' :: RepositoryMetadata -> Maybe Text
arn} -> Maybe Text
arn) (\s :: RepositoryMetadata
s@RepositoryMetadata' {} Maybe Text
a -> RepositoryMetadata
s {$sel:arn:RepositoryMetadata' :: Maybe Text
arn = Maybe Text
a} :: RepositoryMetadata)
repositoryMetadata_cloneUrlHttp :: Lens.Lens' RepositoryMetadata (Prelude.Maybe Prelude.Text)
repositoryMetadata_cloneUrlHttp :: (Maybe Text -> f (Maybe Text))
-> RepositoryMetadata -> f RepositoryMetadata
repositoryMetadata_cloneUrlHttp = (RepositoryMetadata -> Maybe Text)
-> (RepositoryMetadata -> Maybe Text -> RepositoryMetadata)
-> Lens
RepositoryMetadata RepositoryMetadata (Maybe Text) (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RepositoryMetadata' {Maybe Text
cloneUrlHttp :: Maybe Text
$sel:cloneUrlHttp:RepositoryMetadata' :: RepositoryMetadata -> Maybe Text
cloneUrlHttp} -> Maybe Text
cloneUrlHttp) (\s :: RepositoryMetadata
s@RepositoryMetadata' {} Maybe Text
a -> RepositoryMetadata
s {$sel:cloneUrlHttp:RepositoryMetadata' :: Maybe Text
cloneUrlHttp = Maybe Text
a} :: RepositoryMetadata)
repositoryMetadata_accountId :: Lens.Lens' RepositoryMetadata (Prelude.Maybe Prelude.Text)
repositoryMetadata_accountId :: (Maybe Text -> f (Maybe Text))
-> RepositoryMetadata -> f RepositoryMetadata
repositoryMetadata_accountId = (RepositoryMetadata -> Maybe Text)
-> (RepositoryMetadata -> Maybe Text -> RepositoryMetadata)
-> Lens
RepositoryMetadata RepositoryMetadata (Maybe Text) (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RepositoryMetadata' {Maybe Text
accountId :: Maybe Text
$sel:accountId:RepositoryMetadata' :: RepositoryMetadata -> Maybe Text
accountId} -> Maybe Text
accountId) (\s :: RepositoryMetadata
s@RepositoryMetadata' {} Maybe Text
a -> RepositoryMetadata
s {$sel:accountId:RepositoryMetadata' :: Maybe Text
accountId = Maybe Text
a} :: RepositoryMetadata)
repositoryMetadata_defaultBranch :: Lens.Lens' RepositoryMetadata (Prelude.Maybe Prelude.Text)
repositoryMetadata_defaultBranch :: (Maybe Text -> f (Maybe Text))
-> RepositoryMetadata -> f RepositoryMetadata
repositoryMetadata_defaultBranch = (RepositoryMetadata -> Maybe Text)
-> (RepositoryMetadata -> Maybe Text -> RepositoryMetadata)
-> Lens
RepositoryMetadata RepositoryMetadata (Maybe Text) (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RepositoryMetadata' {Maybe Text
defaultBranch :: Maybe Text
$sel:defaultBranch:RepositoryMetadata' :: RepositoryMetadata -> Maybe Text
defaultBranch} -> Maybe Text
defaultBranch) (\s :: RepositoryMetadata
s@RepositoryMetadata' {} Maybe Text
a -> RepositoryMetadata
s {$sel:defaultBranch:RepositoryMetadata' :: Maybe Text
defaultBranch = Maybe Text
a} :: RepositoryMetadata)
repositoryMetadata_repositoryId :: Lens.Lens' RepositoryMetadata (Prelude.Maybe Prelude.Text)
repositoryMetadata_repositoryId :: (Maybe Text -> f (Maybe Text))
-> RepositoryMetadata -> f RepositoryMetadata
repositoryMetadata_repositoryId = (RepositoryMetadata -> Maybe Text)
-> (RepositoryMetadata -> Maybe Text -> RepositoryMetadata)
-> Lens
RepositoryMetadata RepositoryMetadata (Maybe Text) (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RepositoryMetadata' {Maybe Text
repositoryId :: Maybe Text
$sel:repositoryId:RepositoryMetadata' :: RepositoryMetadata -> Maybe Text
repositoryId} -> Maybe Text
repositoryId) (\s :: RepositoryMetadata
s@RepositoryMetadata' {} Maybe Text
a -> RepositoryMetadata
s {$sel:repositoryId:RepositoryMetadata' :: Maybe Text
repositoryId = Maybe Text
a} :: RepositoryMetadata)
repositoryMetadata_repositoryName :: Lens.Lens' RepositoryMetadata (Prelude.Maybe Prelude.Text)
repositoryMetadata_repositoryName :: (Maybe Text -> f (Maybe Text))
-> RepositoryMetadata -> f RepositoryMetadata
repositoryMetadata_repositoryName = (RepositoryMetadata -> Maybe Text)
-> (RepositoryMetadata -> Maybe Text -> RepositoryMetadata)
-> Lens
RepositoryMetadata RepositoryMetadata (Maybe Text) (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RepositoryMetadata' {Maybe Text
repositoryName :: Maybe Text
$sel:repositoryName:RepositoryMetadata' :: RepositoryMetadata -> Maybe Text
repositoryName} -> Maybe Text
repositoryName) (\s :: RepositoryMetadata
s@RepositoryMetadata' {} Maybe Text
a -> RepositoryMetadata
s {$sel:repositoryName:RepositoryMetadata' :: Maybe Text
repositoryName = Maybe Text
a} :: RepositoryMetadata)
repositoryMetadata_creationDate :: Lens.Lens' RepositoryMetadata (Prelude.Maybe Prelude.UTCTime)
repositoryMetadata_creationDate :: (Maybe UTCTime -> f (Maybe UTCTime))
-> RepositoryMetadata -> f RepositoryMetadata
repositoryMetadata_creationDate = (RepositoryMetadata -> Maybe POSIX)
-> (RepositoryMetadata -> Maybe POSIX -> RepositoryMetadata)
-> Lens
RepositoryMetadata RepositoryMetadata (Maybe POSIX) (Maybe POSIX)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RepositoryMetadata' {Maybe POSIX
creationDate :: Maybe POSIX
$sel:creationDate:RepositoryMetadata' :: RepositoryMetadata -> Maybe POSIX
creationDate} -> Maybe POSIX
creationDate) (\s :: RepositoryMetadata
s@RepositoryMetadata' {} Maybe POSIX
a -> RepositoryMetadata
s {$sel:creationDate:RepositoryMetadata' :: Maybe POSIX
creationDate = Maybe POSIX
a} :: RepositoryMetadata) ((Maybe POSIX -> f (Maybe POSIX))
-> RepositoryMetadata -> f RepositoryMetadata)
-> ((Maybe UTCTime -> f (Maybe UTCTime))
-> Maybe POSIX -> f (Maybe POSIX))
-> (Maybe UTCTime -> f (Maybe UTCTime))
-> RepositoryMetadata
-> f RepositoryMetadata
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. AnIso POSIX POSIX UTCTime UTCTime
-> Iso (Maybe POSIX) (Maybe POSIX) (Maybe UTCTime) (Maybe UTCTime)
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 AnIso POSIX POSIX UTCTime UTCTime
forall (a :: Format). Iso' (Time a) UTCTime
Core._Time
repositoryMetadata_cloneUrlSsh :: Lens.Lens' RepositoryMetadata (Prelude.Maybe Prelude.Text)
repositoryMetadata_cloneUrlSsh :: (Maybe Text -> f (Maybe Text))
-> RepositoryMetadata -> f RepositoryMetadata
repositoryMetadata_cloneUrlSsh = (RepositoryMetadata -> Maybe Text)
-> (RepositoryMetadata -> Maybe Text -> RepositoryMetadata)
-> Lens
RepositoryMetadata RepositoryMetadata (Maybe Text) (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RepositoryMetadata' {Maybe Text
cloneUrlSsh :: Maybe Text
$sel:cloneUrlSsh:RepositoryMetadata' :: RepositoryMetadata -> Maybe Text
cloneUrlSsh} -> Maybe Text
cloneUrlSsh) (\s :: RepositoryMetadata
s@RepositoryMetadata' {} Maybe Text
a -> RepositoryMetadata
s {$sel:cloneUrlSsh:RepositoryMetadata' :: Maybe Text
cloneUrlSsh = Maybe Text
a} :: RepositoryMetadata)
instance Core.FromJSON RepositoryMetadata where
parseJSON :: Value -> Parser RepositoryMetadata
parseJSON =
String
-> (Object -> Parser RepositoryMetadata)
-> Value
-> Parser RepositoryMetadata
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Core.withObject
String
"RepositoryMetadata"
( \Object
x ->
Maybe Text
-> Maybe POSIX
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe POSIX
-> Maybe Text
-> RepositoryMetadata
RepositoryMetadata'
(Maybe Text
-> Maybe POSIX
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe POSIX
-> Maybe Text
-> RepositoryMetadata)
-> Parser (Maybe Text)
-> Parser
(Maybe POSIX
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe POSIX
-> Maybe Text
-> RepositoryMetadata)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"repositoryDescription")
Parser
(Maybe POSIX
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe POSIX
-> Maybe Text
-> RepositoryMetadata)
-> Parser (Maybe POSIX)
-> Parser
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe POSIX
-> Maybe Text
-> RepositoryMetadata)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe POSIX)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"lastModifiedDate")
Parser
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe POSIX
-> Maybe Text
-> RepositoryMetadata)
-> Parser (Maybe Text)
-> Parser
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe POSIX
-> Maybe Text
-> RepositoryMetadata)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"Arn")
Parser
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe POSIX
-> Maybe Text
-> RepositoryMetadata)
-> Parser (Maybe Text)
-> Parser
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe POSIX
-> Maybe Text
-> RepositoryMetadata)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"cloneUrlHttp")
Parser
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe POSIX
-> Maybe Text
-> RepositoryMetadata)
-> Parser (Maybe Text)
-> Parser
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe POSIX
-> Maybe Text
-> RepositoryMetadata)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"accountId")
Parser
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe POSIX
-> Maybe Text
-> RepositoryMetadata)
-> Parser (Maybe Text)
-> Parser
(Maybe Text
-> Maybe Text -> Maybe POSIX -> Maybe Text -> RepositoryMetadata)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"defaultBranch")
Parser
(Maybe Text
-> Maybe Text -> Maybe POSIX -> Maybe Text -> RepositoryMetadata)
-> Parser (Maybe Text)
-> Parser
(Maybe Text -> Maybe POSIX -> Maybe Text -> RepositoryMetadata)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"repositoryId")
Parser
(Maybe Text -> Maybe POSIX -> Maybe Text -> RepositoryMetadata)
-> Parser (Maybe Text)
-> Parser (Maybe POSIX -> Maybe Text -> RepositoryMetadata)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"repositoryName")
Parser (Maybe POSIX -> Maybe Text -> RepositoryMetadata)
-> Parser (Maybe POSIX)
-> Parser (Maybe Text -> RepositoryMetadata)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe POSIX)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"creationDate")
Parser (Maybe Text -> RepositoryMetadata)
-> Parser (Maybe Text) -> Parser RepositoryMetadata
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"cloneUrlSsh")
)
instance Prelude.Hashable RepositoryMetadata
instance Prelude.NFData RepositoryMetadata