generated from tpl/purs
chore: stuff
This commit is contained in:
parent
a9d690075e
commit
d4b937d0f6
@ -1,6 +1,7 @@
|
||||
package:
|
||||
dependencies:
|
||||
- aff
|
||||
- arrays
|
||||
- effect
|
||||
- either
|
||||
- exceptions
|
||||
@ -11,6 +12,7 @@ package:
|
||||
- node-buffer
|
||||
- prelude
|
||||
- simple-json
|
||||
- tailrec
|
||||
- transformers
|
||||
- tuples
|
||||
- typelevel-prelude
|
||||
|
@ -29,7 +29,7 @@ reposURL (Username owner) (RepoName repo) =
|
||||
build <$> ask
|
||||
|
||||
repoTopicsPageURL :: forall m. Monad m => Username -> RepoName -> { page :: Int, limit :: Int } -> GiteaT m URL
|
||||
repoTopicsPageURL o repo {page, limit} = (\repos -> repos / "topics" ? "limit" /\ show limit & "page" /\ show page) <$> reposURL o repo
|
||||
repoTopicsPageURL o repo { page, limit } = (\repos -> repos / "topics" ? "limit" /\ show limit & "page" /\ show page) <$> reposURL o repo
|
||||
|
||||
repoTopicsOneURL :: forall m. Monad m => Username -> RepoName -> TopicName -> GiteaT m URL
|
||||
repoTopicsOneURL o repo (TopicName topic) = (\repos -> repos / "topics" / topic) <$> reposURL o repo
|
||||
|
Loading…
Reference in New Issue
Block a user