fix: list branch protections type

This commit is contained in:
orion 2023-11-28 10:36:46 -06:00
parent 0bab60e1fb
commit 032ff8fa63
Signed by: orion
GPG Key ID: 6D4165AE4C928719

View File

@ -28,7 +28,7 @@ get u r b = do
rep <- HTTP.fetch $ HTTP.GET /\ url /\ Auth.headers auth rep <- HTTP.fetch $ HTTP.GET /\ url /\ Auth.headers auth
Error.tryGetRepJSON rep Error.tryGetRepJSON rep
list :: forall m. MonadAff m => Username -> RepoName -> GiteaT m (Record BranchProtection) list :: forall m. MonadAff m => Username -> RepoName -> GiteaT m (Array (Record BranchProtection))
list u r = do list u r = do
{ auth } <- ask { auth } <- ask
url <- branchProtectionURL u r url <- branchProtectionURL u r