|m       !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~  (c) Finlay Thompson, 2015BSD3finlay.thompson@gmail.com experimentalNone ,59;<=DT`IntegrationInstallations InstallationIssue/Content<Commit= OrganisationD RepositoriesI)repositories are identified by their nameJ RepositoryQOrganisationMemberWmembers are identified by idsXMember\Identifier for a team id]Teamd3Primary identifier for an organisation is the logine Organisationj'List of results including a total count  !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~n  !"#$%&'()*+,-./0123456789:;<=>A?@BCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnjklmefghiQRSTUVdc-.]^_`ab\XYZ[WJKLMNOPDEFGHI=>?@ABC<;789:/0123456 !"#$%&'()*+,  3  !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~(c) Finlay Thompson, 2015BSD3finlay.thompson@gmail.com experimentalNone ,9:;DQRTWGitHubState options that control which headers are provided to the API and stores the   header result'The number of records returned per pageThe page number returnedContains the returned   header, if available.!Flag to set the recursive mode onText to send as  User-agent:This class defines how the client code is actually called.LClosed type family for recursively defining the GitHub client funciton types ZClient function that returns a total count and list of results, and is therefore paginatedJClient function that returns a list of results, and is therefore paginated,Client function that returns a single result_Closed type family that adds headers necessary for pagination. In particular, it captures the Link header from the response.Closed type family that adds standard headers to the incoming servant API type. The extra headers are put after any arguments types.The ! monad provides execution context7Token used to authorize access to the GitHub API. see &https://developer.github.com/v3/oauth/?Most of the time we must use api.github.com, but calling loginoauth.access_token only works if sent to github.com.2You need to provide a 'Maybe AuthToken' to lift a  computation into the   monad.Wrapper around the servant G function, that takes care of the extra headers that required for the  monad.dOveride default value for User-agent header. Note, GitHub requires that a User-agent header be set.-Set next page back to 1, and remove the links-Turn automatic recusive behaviour on and off.\If recursive is on, paginated results will be automatically followed and concated together.-Turn automatic recusive behaviour on and off.\If recursive is on, paginated results will be automatically followed and concated together.iThe default number of records per page is set to 100. Smaller pages can be set, but not bigger than 100. Return the  6 header. This is only set when there are futher pages.1Instance for the case where we have single resultGInstance for the case where we have a total count and paginated results5Instance for the case where we have paginated resultsB : (c) Finlay Thompson, 2015BSD3finlay.thompson@gmail.com experimentalNone,QR Dhttps://developer.github.com/v3/issues/#list-issues-for-a-repository GET repos:owner:repoissues <https://developer.github.com/v3/repos/contents/#get-contents GET repos:owner:repocontents/:path Bhttps://developer.github.com/v3/repos/commits/#get-a-single-commit Ghttps://developer.github.com/v3/repos/collaborators/#list-collaborators Ahttps://developer.github.com/v3/apps/#list-installations-for-user 8https://developer.github.com/v3/apps/#find-installations ohttps://developer.github.com/early-access/integrations/integrations-vs-oauth-applications/#repository-discovery Ehttps://developer.github.com/v3/repos/#list-organization-repositories phttps://developer.github.com/v3/apps/installations/#list-repositories-accessible-to-the-user-for-an-installation =https://developer.github.com/v3/repos/#list-your-repositories 8https://developer.github.com/v3/users/#get-a-single-user Ahttps://developer.github.com/v3/users/#get-the-authenticated-user 4https://developer.github.com/v3/orgs/teams/#get-team ;https://developer.github.com/v3/orgs/teams/#list-team-repos =https://developer.github.com/v3/orgs/teams/#list-team-members 6https://developer.github.com/v3/orgs/teams/#list-teams Phttps://developer.github.com/v3/orgs/members/#list-your-organization-memberships =https://developer.github.com/v3/orgs/#list-your-organizations(c) Finlay Thompson, 2015BSD3finlay.thompson@gmail.com experimentalNone ,DQRTGet issuers for a repository Get list of e records for authorised user Get list of Q records for authorised user Get list of ]& records, given the organisation loginGet the ] record associated to a TeamId Get list of X records assoctiated to ] given by Team Id Get list of J records assoctiated to ] given by Team Id,Get the current user for the authorised userLookup user by login(Get repositories for the authorised userTList repositories that are accessible to the authenticated user for an installation.*Get repositories for an organisation loginUGet repositories for the installation (current token should be an installation token)$Get installations for the applictionAList installations that are accessible to the authenticated user.UGet repositories for the installation (current token should be an installation token)!Get commit for repo and reference+Get content for repo and reference and path    !"#$%&'()*+,-./0123456789:;<=>A?@BCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklm              !"#$%&'()*+,,--./012344567899:;<=>?@ABCDEEFGHIJKKLMNOPQQRSTUUVWXYZ[\\]^_``abcdefghijklmnopqrstuvwxyz{|}~     -servant-github-0.1.0.6-Jg6eNiHJnNk8hKRqM5q4ZVNetwork.GitHub.TypesNetwork.GitHub.ClientNetwork.GitHub.APINetwork.GitHubInstallationUseruser_idInstallationAccessTokentoken Installations InstallationinstallationIdinstallationAppIdinstallationTargetIdinstallationTargetTypeEarlyAccessJSONIssue issueNumberissueUrl issueState issueTitle issueBody issueUser issueAssigneeissueMilestone issueLabels issueLocked issueComments issueCreated issueUpdated issueClosedLabel MilestonemilestoneNumbermilestoneStatemilestoneTitlemilestoneDescripitonmilestoneCreatormilestoneOpenIssuesmilestoneClosedIssuesmilestoneCreatedmilestoneUpdatedmilestoneClosedmilestoneDueOn UserLoginContent contentTypecontentEncoding contentSize contentName contentPathcontentContentCommit commitMessage commitUrlShaRepoNameUser userLoginuserIduserName userCompany userEmail Repositories PermissionPushPullAdminRepositoryName RepositoryrepositoryNamerepositoryDescriptionrepositoryDefaultBranchrepositoryPrivaterepositoryPermissionsOrganisationMember orgmemberRoleorgmemberStateorgmemberOrganisation orgmemberUserMemberIdMembermemberId memberLoginTeamIdTeamteamIdteamNameteamDescriptionteamPermissionOwnerOrgLogin OrganisationorgLoginorgIdorgDescription CountedList totalCountitems$fToJSONInstallationUser$fFromJSONInstallationUser$fToJSONInstallationAccessToken!$fFromJSONInstallationAccessToken$fFromJSONInstallation$fAcceptTYPEEarlyAccessJSON"$fMimeUnrenderTYPEEarlyAccessJSONt$fFromJSONIssue$fFromJSONLabel$fFromJSONMilestone$fFromJSONUserLogin$fFromJSONContent$fToJSONCommit$fFromJSONCommit $fToJSONUser$fFromJSONUser$fFromJSONRepository$fFromJSONPermission$fShowPermission$fFromJSONOrganisationMember$fFromJSONMember$fFromJSONTeam$fFromJSONOrganisation$fFromJSONCountedList$fEqOrganisation$fShowOrganisation$fEqTeam $fShowTeam $fEqMember $fShowMember$fEqOrganisationMember$fShowOrganisationMember$fEqPermission$fEqRepository$fShowRepository$fEqUser $fShowUser $fEqCommit $fShowCommit $fEqContent $fShowContent$fShowUserLogin $fEqUserLogin$fShowMilestone $fEqMilestone $fEqLabel $fShowLabel$fGenericIssue $fEqIssue $fShowIssue$fEqInstallation$fShowInstallation$fEqInstallationAccessToken$fShowInstallationAccessToken $fGenericInstallationAccessToken$fEqInstallationUser$fShowInstallationUser$fGenericInstallationUser GitHubStateperPagepagelinksrecurse useragent HasGitHub embedGitHub EmbedGitHub PaginatedSingle ReadHeaders AddHeadersGitHub AuthTokenrunGitHubClientMrunGitHubNotApiClientM runGitHub' runGitHubgithub setUserAgentresetPagination recurseOff recurseOnpageSizegetLinks$fHasGitHub(->)$fHasGitHub(->)0$fHasGitHub(->)1$fHasGitHub(->)2$fHasGitHub(->)3$fHasGitHub(->)4$fHasGitHub(->)5$fHasGitHub(->)6$fHasGitHub(->)7$fHasGitHub(->)8$fHasGitHub(->)9$fHasGitHub(->)10$fHasGitHub(->)11$fHasGitHub(->)12$fHasGitHub(->)13$fHasGitHub(->)14$fHasGitHub(->)15$fHasGitHub(->)16$fHasGitHub(->)17$fHasGitHub(->)18$fHasGitHub(->)19$fHasGitHub(->)20$fHasGitHub(->)21$fHasGitHub(->)22$fHasGitHub(->)23$fHasGitHub(->)24$fHasGitHub(->)25$fHasGitHub(->)26$fHasGitHub(->)27$fHasGitHub(->)28$fToHttpApiDataAuthToken$fIsStringAuthToken $fEqAuthTokenReqInstallationAccessToken GetIssues GetContent GetCommitRepositoryCollaboratorsUserInstallationsAppInstallationsInstallationRepositoriesOrganisationRepositoriesUserInstallationRepositoriesUserRepositoriesGetUserByLoginGetUserGetTeamTeamRepositories TeamMembersOrganisationTeamsUserOrganisationMembershipsUserOrganisationsuserOrganisationsuserOrganisationMembershipsorganisationTeamsgetTeam teamMembersteamRepositoriesuser userByLoginuserRepositoriesuserInstallationRepositoriesorganisationRepositoriesinstallationRepositoriesappInstallationsuserInstallationsrepositoryCollaborators getCommit getContent getIssuesintegrationJWTreqInstallationAccessToken-http-link-header-1.0.3-ENY9HMTBVqWGNttAFZC3PfNetwork.HTTP.Link.TypesLinkCountedPaginatedghc-prim GHC.TypesIO*servant-client-0.11-IObTFddAeY4EtldVkKSadGServant.Clientclienthost hostNotApiclientWithHeadersdefGitHubState hasNextLink GHOptions