Îõ³h$[Ò      !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQ#Brandon Chinn  experimentalportableNone àH  github-rest-The token to use to authenticate with GitHub.  github-rest /https://developer.github.com/v3/#authentication  github-rest öhttps://developer.github.com/apps/building-github-apps/authenticating-with-github-apps/#authenticating-as-a-github-app github-rest.Create a JWT token that expires in 10 minutes. github-rest experimentalportableNone'(>Àk github-rest%A type representing a key-value pair. github-rest/Convert the given KeyValues into a JSON Object. github-rest0Represent the given KeyValue as a pair of Texts.1#Brandon Chinn  experimentalportableNone #$ github-rest A call to a GitHub API endpoint. github-restÕThe GitHub API endpoint, with colon-prefixed components that will be replaced; e.g. "/users/:username/repos" github-rest8Key-value pairs to replace colon-prefixed components in ; e.g. #[ "username" := ("alice" :: Text) ] github-rest3Key-value pairs to send in the request body; e.g. Á[ "sort" := ("created" :: Text), "direction" := ("asc" :: Text) ] github-rest5Return the endpoint path, populated by the values in .  github-rest"Render the method of the endpoint.    Safe-Inferred Ð! github-rest"Helper type for GitHub pagination. Âhttps://developer.github.com/v3/guides/traversing-with-pagination/!"#$%&'!"#$%&'#Brandon Chinn  experimentalportableNoneì Ö, github-rest;A type class for monads that can query the GitHub REST API.Example: ™-- create the "foo" branch queryGitHub GHEndpoint { method = POST , endpoint = "/repos/:owner/:repo/git/refs" , endpointVals = [ "owner" := "alice" , "repo" := "my-project" ] , ghData = [ "ref" := "refs/heads/foo" , "sha" := "1234567890abcdef" ] }ÎIt's recommended that you create functions for the API endpoints you're using: ødeleteBranch branch = queryGitHub GHEndpoint { method = DELETE , endpoint = "/repos/:owner/:repo/git/refs/:ref" , endpointVals = [ "owner" := "alice" , "repo" := "my-project" , "ref" := "heads/" <> branch ] , ghData = [] }- github-restQuery GitHub, returning (payload, links) if successful, where payload, is the response that GitHub sent back and linksô containing any pagination links GitHub may have sent back. If the response could not be decoded as JSON, returns *Left (error message, response from server).ƒErrors on network connection failures, if GitHub sent back an error message, or if the response could not be decoded as JSON. Use  githubTry% if you wish to handle GitHub errors.. github-rest-#, except ignoring pagination links./ github-restRepeatedly calls -À for each page returned by GitHub and concatenates the results.0 github-rest., except ignores the result.,-./0,-./0#Brandon Chinn  experimentalportableNone #$ÎÑåÅ; github-rest'A simple monad that can run REST calls.? github-rest.The token to use to authenticate with the API.@ github-rest5The user agent to use when interacting with the API: 4https://developer.github.com/v3/#user-agent-requiredA github-restŠThe media type will be sent as: application/vnd.github.VERSION+json. For the standard API endpoints, "v3" should be sufficient here. See &https://developer.github.com/v3/media/B github-rest Initialize a <.C github-restSame as -, except explicitly taking in < and running in IO.Useful for implementing , outside of ;.D github-restRun the given ;, action with the given token and user agent.4The token will be sent with each API request -- see  ?. The user agent is also required for each API request -- see  4https://developer.github.com/v3/#user-agent-required.,-./0;<=>?@ABCD,-./0C?@A;D#Brandon Chinn  experimentalportableNoneÛO github-rest4Handle 422 exceptions thrown by the GitHub REST API.‡Most client errors are 422, since we should always be sending valid JSON. If an endpoint throws different error codes, use githubTry'. .https://developer.github.com/v3/#client-errorsP github-rest9Handle the given exception thrown by the GitHub REST API.Q github-rest?Get the given key from the Value, erroring if it doesn't exist.&  ,-./0;=>?@ADOPQ&,-./0;=>?@AD OPQ  Safe-InferredNRSTUVWXYÚ           !""#$%&'()*++,-./0123456789:;<=>?@ABCDEFFGHIJKLMNOPQRSTUVWXYZ[\]^_`aâ(github-rest-1.1.0-AxV85gK0HeBGPeRaqvIIqF GitHub.RESTGitHub.REST.AuthGitHub.REST.KeyValueGitHub.REST.EndpointGitHub.REST.PageLinksGitHub.REST.Monad.ClassGitHub.REST.MonadPaths_github_rest(http-types-0.12.3-4GNA9TDzoeBAsbUUnfJUjtNetwork.HTTP.Types.MethodPATCHOPTIONSCONNECTTRACEDELETEPUTHEADPOSTGET StdMethodToken AccessToken BearerToken fromToken getJWTToken loadSigner $fShowTokenKeyValue:= kvToValuekvToText $fToJSON[]$fShowKeyValue GHEndpointmethodendpoint endpointValsghData GitHubData EndpointVals endpointPath renderMethod PageLinks pageFirstpagePrevpageNextpageLastparsePageLinks$fMonoidPageLinks$fSemigroupPageLinks $fEqPageLinks$fShowPageLinksMonadGitHubRESTqueryGitHubPage queryGitHubqueryGitHubAll queryGitHub_$fMonadGitHubRESTWriterT$fMonadGitHubRESTWriterT0$fMonadGitHubRESTStateT$fMonadGitHubRESTStateT0$fMonadGitHubRESTRWST$fMonadGitHubRESTRWST0$fMonadGitHubRESTMaybeT$fMonadGitHubRESTIdentityT$fMonadGitHubRESTExceptT$fMonadGitHubRESTReaderTGitHubT GitHubManagerGitHubSettings$sel:token:GitHubSettings$sel:userAgent:GitHubSettings$sel:apiVersion:GitHubSettingsinitGitHubManagerqueryGitHubPageIO runGitHubT$fExceptionDecodeError$fMonadGitHubRESTGitHubT$fMonadUnliftIOGitHubT$fFunctorGitHubT$fApplicativeGitHubT$fMonadGitHubT$fMonadFailGitHubT$fMonadIOGitHubT$fMonadTransGitHubT$fShowDecodeError githubTry githubTry'.:version getBinDir getLibDir getDynLibDir getDataDir getLibexecDir getSysconfDirgetDataFileName