{-# LANGUAGE DataKinds #-}
{-# LANGUAGE DeriveDataTypeable #-}
{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE FlexibleInstances #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE TypeFamilies #-}
{-# LANGUAGE TypeOperators #-}
{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
{-# OPTIONS_GHC -fno-warn-unused-binds #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
module Network.Google.Resource.Books.MyLibrary.Annotations.List
(
MyLibraryAnnotationsListResource
, myLibraryAnnotationsList
, MyLibraryAnnotationsList
, mlalContentVersion
, mlalShowDeleted
, mlalUpdatedMax
, mlalUpdatedMin
, mlalLayerIds
, mlalVolumeId
, mlalSource
, mlalPageToken
, mlalLayerId
, mlalMaxResults
) where
import Network.Google.Books.Types
import Network.Google.Prelude
type MyLibraryAnnotationsListResource =
"books" :>
"v1" :>
"mylibrary" :>
"annotations" :>
QueryParam "contentVersion" Text :>
QueryParam "showDeleted" Bool :>
QueryParam "updatedMax" Text :>
QueryParam "updatedMin" Text :>
QueryParams "layerIds" Text :>
QueryParam "volumeId" Text :>
QueryParam "source" Text :>
QueryParam "pageToken" Text :>
QueryParam "layerId" Text :>
QueryParam "maxResults" (Textual Word32) :>
QueryParam "alt" AltJSON :>
Get '[JSON] Annotations
data MyLibraryAnnotationsList = MyLibraryAnnotationsList'
{ _mlalContentVersion :: !(Maybe Text)
, _mlalShowDeleted :: !(Maybe Bool)
, _mlalUpdatedMax :: !(Maybe Text)
, _mlalUpdatedMin :: !(Maybe Text)
, _mlalLayerIds :: !(Maybe [Text])
, _mlalVolumeId :: !(Maybe Text)
, _mlalSource :: !(Maybe Text)
, _mlalPageToken :: !(Maybe Text)
, _mlalLayerId :: !(Maybe Text)
, _mlalMaxResults :: !(Maybe (Textual Word32))
} deriving (Eq,Show,Data,Typeable,Generic)
myLibraryAnnotationsList
:: MyLibraryAnnotationsList
myLibraryAnnotationsList =
MyLibraryAnnotationsList'
{ _mlalContentVersion = Nothing
, _mlalShowDeleted = Nothing
, _mlalUpdatedMax = Nothing
, _mlalUpdatedMin = Nothing
, _mlalLayerIds = Nothing
, _mlalVolumeId = Nothing
, _mlalSource = Nothing
, _mlalPageToken = Nothing
, _mlalLayerId = Nothing
, _mlalMaxResults = Nothing
}
mlalContentVersion :: Lens' MyLibraryAnnotationsList (Maybe Text)
mlalContentVersion
= lens _mlalContentVersion
(\ s a -> s{_mlalContentVersion = a})
mlalShowDeleted :: Lens' MyLibraryAnnotationsList (Maybe Bool)
mlalShowDeleted
= lens _mlalShowDeleted
(\ s a -> s{_mlalShowDeleted = a})
mlalUpdatedMax :: Lens' MyLibraryAnnotationsList (Maybe Text)
mlalUpdatedMax
= lens _mlalUpdatedMax
(\ s a -> s{_mlalUpdatedMax = a})
mlalUpdatedMin :: Lens' MyLibraryAnnotationsList (Maybe Text)
mlalUpdatedMin
= lens _mlalUpdatedMin
(\ s a -> s{_mlalUpdatedMin = a})
mlalLayerIds :: Lens' MyLibraryAnnotationsList [Text]
mlalLayerIds
= lens _mlalLayerIds (\ s a -> s{_mlalLayerIds = a})
. _Default
. _Coerce
mlalVolumeId :: Lens' MyLibraryAnnotationsList (Maybe Text)
mlalVolumeId
= lens _mlalVolumeId (\ s a -> s{_mlalVolumeId = a})
mlalSource :: Lens' MyLibraryAnnotationsList (Maybe Text)
mlalSource
= lens _mlalSource (\ s a -> s{_mlalSource = a})
mlalPageToken :: Lens' MyLibraryAnnotationsList (Maybe Text)
mlalPageToken
= lens _mlalPageToken
(\ s a -> s{_mlalPageToken = a})
mlalLayerId :: Lens' MyLibraryAnnotationsList (Maybe Text)
mlalLayerId
= lens _mlalLayerId (\ s a -> s{_mlalLayerId = a})
mlalMaxResults :: Lens' MyLibraryAnnotationsList (Maybe Word32)
mlalMaxResults
= lens _mlalMaxResults
(\ s a -> s{_mlalMaxResults = a})
. mapping _Coerce
instance GoogleRequest MyLibraryAnnotationsList where
type Rs MyLibraryAnnotationsList = Annotations
type Scopes MyLibraryAnnotationsList =
'["https://www.googleapis.com/auth/books"]
requestClient MyLibraryAnnotationsList'{..}
= go _mlalContentVersion _mlalShowDeleted
_mlalUpdatedMax
_mlalUpdatedMin
(_mlalLayerIds ^. _Default)
_mlalVolumeId
_mlalSource
_mlalPageToken
_mlalLayerId
_mlalMaxResults
(Just AltJSON)
booksService
where go
= buildClient
(Proxy :: Proxy MyLibraryAnnotationsListResource)
mempty