-- |
-- The Github Search API, as described at
-- .
module GitHub.Endpoints.Search(
searchReposR,
searchCodeR,
searchIssuesR,
searchUsersR,
module GitHub.Data,
) where
import GitHub.Data
import GitHub.Internal.Prelude
import Prelude ()
import qualified Data.Text.Encoding as TE
-- | Search repositories.
-- See
searchReposR :: Text -> FetchCount -> Request k (SearchResult Repo)
searchReposR searchString =
PagedQuery ["search", "repositories"] [("q", Just $ TE.encodeUtf8 searchString)]
-- | Search code.
-- See
searchCodeR :: Text -> FetchCount -> Request k (SearchResult Code)
searchCodeR searchString =
PagedQuery ["search", "code"] [("q", Just $ TE.encodeUtf8 searchString)]
-- | Search issues.
-- See
searchIssuesR :: Text -> FetchCount -> Request k (SearchResult Issue)
searchIssuesR searchString =
PagedQuery ["search", "issues"] [("q", Just $ TE.encodeUtf8 searchString)]
-- | Search users.
-- See
searchUsersR :: Text -> FetchCount -> Request k (SearchResult SimpleUser)
searchUsersR searchString =
PagedQuery ["search", "users"] [("q", Just $ TE.encodeUtf8 searchString)]