module Network.Google.Resource.People.People.Connections.List
(
PeopleConnectionsListResource
, peopleConnectionsList
, PeopleConnectionsList
, pclSyncToken
, pclXgafv
, pclUploadProtocol
, pclResourceName
, pclRequestMaskIncludeField
, pclPp
, pclAccessToken
, pclUploadType
, pclSortOrder
, pclBearerToken
, pclPageToken
, pclPageSize
, pclCallback
) where
import Network.Google.People.Types
import Network.Google.Prelude
type PeopleConnectionsListResource =
"v1" :>
Capture "resourceName" Text :>
"connections" :>
QueryParam "syncToken" Text :>
QueryParam "$.xgafv" Text :>
QueryParam "upload_protocol" Text :>
QueryParam "requestMask.includeField" Text :>
QueryParam "pp" Bool :>
QueryParam "access_token" Text :>
QueryParam "uploadType" Text :>
QueryParam "sortOrder" Text :>
QueryParam "bearer_token" Text :>
QueryParam "pageToken" Text :>
QueryParam "pageSize" (Textual Int32) :>
QueryParam "callback" Text :>
QueryParam "alt" AltJSON :>
Get '[JSON] ListConnectionsResponse
data PeopleConnectionsList = PeopleConnectionsList'
{ _pclSyncToken :: !(Maybe Text)
, _pclXgafv :: !(Maybe Text)
, _pclUploadProtocol :: !(Maybe Text)
, _pclResourceName :: !Text
, _pclRequestMaskIncludeField :: !(Maybe Text)
, _pclPp :: !Bool
, _pclAccessToken :: !(Maybe Text)
, _pclUploadType :: !(Maybe Text)
, _pclSortOrder :: !(Maybe Text)
, _pclBearerToken :: !(Maybe Text)
, _pclPageToken :: !(Maybe Text)
, _pclPageSize :: !(Maybe (Textual Int32))
, _pclCallback :: !(Maybe Text)
} deriving (Eq,Show,Data,Typeable,Generic)
peopleConnectionsList
:: Text
-> PeopleConnectionsList
peopleConnectionsList pPclResourceName_ =
PeopleConnectionsList'
{ _pclSyncToken = Nothing
, _pclXgafv = Nothing
, _pclUploadProtocol = Nothing
, _pclResourceName = pPclResourceName_
, _pclRequestMaskIncludeField = Nothing
, _pclPp = True
, _pclAccessToken = Nothing
, _pclUploadType = Nothing
, _pclSortOrder = Nothing
, _pclBearerToken = Nothing
, _pclPageToken = Nothing
, _pclPageSize = Nothing
, _pclCallback = Nothing
}
pclSyncToken :: Lens' PeopleConnectionsList (Maybe Text)
pclSyncToken
= lens _pclSyncToken (\ s a -> s{_pclSyncToken = a})
pclXgafv :: Lens' PeopleConnectionsList (Maybe Text)
pclXgafv = lens _pclXgafv (\ s a -> s{_pclXgafv = a})
pclUploadProtocol :: Lens' PeopleConnectionsList (Maybe Text)
pclUploadProtocol
= lens _pclUploadProtocol
(\ s a -> s{_pclUploadProtocol = a})
pclResourceName :: Lens' PeopleConnectionsList Text
pclResourceName
= lens _pclResourceName
(\ s a -> s{_pclResourceName = a})
pclRequestMaskIncludeField :: Lens' PeopleConnectionsList (Maybe Text)
pclRequestMaskIncludeField
= lens _pclRequestMaskIncludeField
(\ s a -> s{_pclRequestMaskIncludeField = a})
pclPp :: Lens' PeopleConnectionsList Bool
pclPp = lens _pclPp (\ s a -> s{_pclPp = a})
pclAccessToken :: Lens' PeopleConnectionsList (Maybe Text)
pclAccessToken
= lens _pclAccessToken
(\ s a -> s{_pclAccessToken = a})
pclUploadType :: Lens' PeopleConnectionsList (Maybe Text)
pclUploadType
= lens _pclUploadType
(\ s a -> s{_pclUploadType = a})
pclSortOrder :: Lens' PeopleConnectionsList (Maybe Text)
pclSortOrder
= lens _pclSortOrder (\ s a -> s{_pclSortOrder = a})
pclBearerToken :: Lens' PeopleConnectionsList (Maybe Text)
pclBearerToken
= lens _pclBearerToken
(\ s a -> s{_pclBearerToken = a})
pclPageToken :: Lens' PeopleConnectionsList (Maybe Text)
pclPageToken
= lens _pclPageToken (\ s a -> s{_pclPageToken = a})
pclPageSize :: Lens' PeopleConnectionsList (Maybe Int32)
pclPageSize
= lens _pclPageSize (\ s a -> s{_pclPageSize = a}) .
mapping _Coerce
pclCallback :: Lens' PeopleConnectionsList (Maybe Text)
pclCallback
= lens _pclCallback (\ s a -> s{_pclCallback = a})
instance GoogleRequest PeopleConnectionsList where
type Rs PeopleConnectionsList =
ListConnectionsResponse
type Scopes PeopleConnectionsList =
'["https://www.googleapis.com/auth/contacts",
"https://www.googleapis.com/auth/contacts.readonly"]
requestClient PeopleConnectionsList'{..}
= go _pclResourceName _pclSyncToken _pclXgafv
_pclUploadProtocol
_pclRequestMaskIncludeField
(Just _pclPp)
_pclAccessToken
_pclUploadType
_pclSortOrder
_pclBearerToken
_pclPageToken
_pclPageSize
_pclCallback
(Just AltJSON)
peopleService
where go
= buildClient
(Proxy :: Proxy PeopleConnectionsListResource)
mempty