diff --git a/README.md b/README.md --- a/README.md +++ b/README.md @@ -8,7 +8,7 @@ ## Version -`0.3.0` +`0.5.0` ## Description diff --git a/gen/Network/Google/DigitalAssetLinks/Types/Product.hs b/gen/Network/Google/DigitalAssetLinks/Types/Product.hs --- a/gen/Network/Google/DigitalAssetLinks/Types/Product.hs +++ b/gen/Network/Google/DigitalAssetLinks/Types/Product.hs @@ -23,11 +23,14 @@ -- | Describes an android app asset. -- -- /See:/ 'androidAppAsset' smart constructor. -data AndroidAppAsset = AndroidAppAsset' +data AndroidAppAsset = + AndroidAppAsset' { _aaaPackageName :: !(Maybe Text) , _aaaCertificate :: !(Maybe CertificateInfo) - } deriving (Eq,Show,Data,Typeable,Generic) + } + deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AndroidAppAsset' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: @@ -38,11 +41,9 @@ androidAppAsset :: AndroidAppAsset androidAppAsset = - AndroidAppAsset' - { _aaaPackageName = Nothing - , _aaaCertificate = Nothing - } + AndroidAppAsset' {_aaaPackageName = Nothing, _aaaCertificate = Nothing} + -- | Android App assets are naturally identified by their Java package name. -- For example, the Google Maps app uses the package name -- \`com.google.android.apps.maps\`. REQUIRED @@ -89,12 +90,15 @@ -- page](\/digital-asset-links\/v1\/getting-started). -- -- /See:/ 'statement' smart constructor. -data Statement = Statement' +data Statement = + Statement' { _sRelation :: !(Maybe Text) , _sSource :: !(Maybe Asset) , _sTarget :: !(Maybe Asset) - } deriving (Eq,Show,Data,Typeable,Generic) + } + deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Statement' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: @@ -107,12 +111,9 @@ statement :: Statement statement = - Statement' - { _sRelation = Nothing - , _sSource = Nothing - , _sTarget = Nothing - } + Statement' {_sRelation = Nothing, _sSource = Nothing, _sTarget = Nothing} + -- | The relation identifies the use of the statement as intended by the -- source asset\'s owner (that is, the person or entity who issued the -- statement). Every complete statement has a relation. We identify @@ -157,11 +158,14 @@ -- and Plus Pages. -- -- /See:/ 'asset' smart constructor. -data Asset = Asset' +data Asset = + Asset' { _aAndroidApp :: !(Maybe AndroidAppAsset) , _aWeb :: !(Maybe WebAsset) - } deriving (Eq,Show,Data,Typeable,Generic) + } + deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'Asset' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: @@ -171,12 +175,9 @@ -- * 'aWeb' asset :: Asset -asset = - Asset' - { _aAndroidApp = Nothing - , _aWeb = Nothing - } +asset = Asset' {_aAndroidApp = Nothing, _aWeb = Nothing} + -- | Set if this is an Android App asset. aAndroidApp :: Lens' Asset (Maybe AndroidAppAsset) aAndroidApp @@ -202,13 +203,16 @@ -- | Response message for the List call. -- -- /See:/ 'listResponse' smart constructor. -data ListResponse = ListResponse' +data ListResponse = + ListResponse' { _lrDebugString :: !(Maybe Text) , _lrMaxAge :: !(Maybe GDuration) , _lrErrorCode :: !(Maybe [Text]) , _lrStatements :: !(Maybe [Statement]) - } deriving (Eq,Show,Data,Typeable,Generic) + } + deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'ListResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: @@ -223,13 +227,14 @@ listResponse :: ListResponse listResponse = - ListResponse' + ListResponse' { _lrDebugString = Nothing , _lrMaxAge = Nothing , _lrErrorCode = Nothing , _lrStatements = Nothing } + -- | Human-readable message containing information intended to help end users -- understand, reproduce and debug the result. The message will be in -- English and we are currently not planning to offer any translations. @@ -284,13 +289,16 @@ -- | Response message for the CheckAssetLinks call. -- -- /See:/ 'checkResponse' smart constructor. -data CheckResponse = CheckResponse' +data CheckResponse = + CheckResponse' { _crDebugString :: !(Maybe Text) , _crMaxAge :: !(Maybe GDuration) , _crErrorCode :: !(Maybe [Text]) , _crLinked :: !(Maybe Bool) - } deriving (Eq,Show,Data,Typeable,Generic) + } + deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'CheckResponse' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: @@ -305,13 +313,14 @@ checkResponse :: CheckResponse checkResponse = - CheckResponse' + CheckResponse' { _crDebugString = Nothing , _crMaxAge = Nothing , _crErrorCode = Nothing , _crLinked = Nothing } + -- | Human-readable message containing information intended to help end users -- understand, reproduce and debug the result. The message will be in -- English and we are currently not planning to offer any translations. @@ -364,10 +373,13 @@ -- | Describes a web asset. -- -- /See:/ 'webAsset' smart constructor. -newtype WebAsset = WebAsset' +newtype WebAsset = + WebAsset' { _waSite :: Maybe Text - } deriving (Eq,Show,Data,Typeable,Generic) + } + deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'WebAsset' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: @@ -375,11 +387,9 @@ -- * 'waSite' webAsset :: WebAsset -webAsset = - WebAsset' - { _waSite = Nothing - } +webAsset = WebAsset' {_waSite = Nothing} + -- | Web assets are identified by a URL that contains only the scheme, -- hostname and port parts. The format is http[s]:\/\/[:] Hostnames must be -- fully qualified: they must end in a single period (\"\`.\`\"). Only the @@ -412,10 +422,13 @@ -- | Describes an X509 certificate. -- -- /See:/ 'certificateInfo' smart constructor. -newtype CertificateInfo = CertificateInfo' +newtype CertificateInfo = + CertificateInfo' { _ciSha256Fingerprint :: Maybe Text - } deriving (Eq,Show,Data,Typeable,Generic) + } + deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'CertificateInfo' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: @@ -423,10 +436,8 @@ -- * 'ciSha256Fingerprint' certificateInfo :: CertificateInfo -certificateInfo = - CertificateInfo' - { _ciSha256Fingerprint = Nothing - } +certificateInfo = CertificateInfo' {_ciSha256Fingerprint = Nothing} + -- | The uppercase SHA-265 fingerprint of the certificate. From the PEM -- certificate, it can be acquired like this: $ keytool -printcert -file diff --git a/gen/Network/Google/Resource/DigitalAssetLinks/Assetlinks/Check.hs b/gen/Network/Google/Resource/DigitalAssetLinks/Assetlinks/Check.hs --- a/gen/Network/Google/Resource/DigitalAssetLinks/Assetlinks/Check.hs +++ b/gen/Network/Google/Resource/DigitalAssetLinks/Assetlinks/Check.hs @@ -115,7 +115,8 @@ -- specification](https:\/\/github.com\/google\/digitalassetlinks\/blob\/master\/well-known\/details.md). -- -- /See:/ 'assetlinksCheck' smart constructor. -data AssetlinksCheck = AssetlinksCheck' +data AssetlinksCheck = + AssetlinksCheck' { _acXgafv :: !(Maybe Xgafv) , _acSourceAndroidAppCertificateSha256Fingerprint :: !(Maybe Text) , _acSourceAndroidAppPackageName :: !(Maybe Text) @@ -128,8 +129,10 @@ , _acTargetAndroidAppPackageName :: !(Maybe Text) , _acSourceWebSite :: !(Maybe Text) , _acCallback :: !(Maybe Text) - } deriving (Eq,Show,Data,Typeable,Generic) + } + deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'AssetlinksCheck' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: @@ -160,7 +163,7 @@ assetlinksCheck :: AssetlinksCheck assetlinksCheck = - AssetlinksCheck' + AssetlinksCheck' { _acXgafv = Nothing , _acSourceAndroidAppCertificateSha256Fingerprint = Nothing , _acSourceAndroidAppPackageName = Nothing @@ -174,6 +177,7 @@ , _acSourceWebSite = Nothing , _acCallback = Nothing } + -- | V1 error format. acXgafv :: Lens' AssetlinksCheck (Maybe Xgafv) diff --git a/gen/Network/Google/Resource/DigitalAssetLinks/Statements/List.hs b/gen/Network/Google/Resource/DigitalAssetLinks/Statements/List.hs --- a/gen/Network/Google/Resource/DigitalAssetLinks/Statements/List.hs +++ b/gen/Network/Google/Resource/DigitalAssetLinks/Statements/List.hs @@ -95,7 +95,8 @@ -- to navigate to the corresponding web site or Google+ profile. -- -- /See:/ 'statementsList' smart constructor. -data StatementsList = StatementsList' +data StatementsList = + StatementsList' { _slXgafv :: !(Maybe Xgafv) , _slSourceAndroidAppCertificateSha256Fingerprint :: !(Maybe Text) , _slSourceAndroidAppPackageName :: !(Maybe Text) @@ -105,8 +106,10 @@ , _slRelation :: !(Maybe Text) , _slSourceWebSite :: !(Maybe Text) , _slCallback :: !(Maybe Text) - } deriving (Eq,Show,Data,Typeable,Generic) + } + deriving (Eq, Show, Data, Typeable, Generic) + -- | Creates a value of 'StatementsList' with the minimum fields required to make a request. -- -- Use one of the following lenses to modify other fields as desired: @@ -131,7 +134,7 @@ statementsList :: StatementsList statementsList = - StatementsList' + StatementsList' { _slXgafv = Nothing , _slSourceAndroidAppCertificateSha256Fingerprint = Nothing , _slSourceAndroidAppPackageName = Nothing @@ -142,6 +145,7 @@ , _slSourceWebSite = Nothing , _slCallback = Nothing } + -- | V1 error format. slXgafv :: Lens' StatementsList (Maybe Xgafv) diff --git a/gogol-digitalassetlinks.cabal b/gogol-digitalassetlinks.cabal --- a/gogol-digitalassetlinks.cabal +++ b/gogol-digitalassetlinks.cabal @@ -1,5 +1,5 @@ name: gogol-digitalassetlinks -version: 0.4.0 +version: 0.5.0 synopsis: Google Digital Asset Links SDK. homepage: https://github.com/brendanhay/gogol bug-reports: https://github.com/brendanhay/gogol/issues @@ -44,5 +44,5 @@ , Network.Google.DigitalAssetLinks.Types.Sum build-depends: - gogol-core == 0.4.0.* + gogol-core == 0.5.0.* , base >= 4.7 && < 5