diff --git a/client/src/client/page/login.gleam b/client/src/client/page/login.gleam index e7e61cb..d359d81 100644 --- a/client/src/client/page/login.gleam +++ b/client/src/client/page/login.gleam @@ -121,8 +121,8 @@ pub fn update(model: Model, msg: Msg) -> LoginStep { |> contract.request_to_json let handler = - contract.response_decoder() - |> rsvp.expect_json(ApiReturnedSession) + ApiReturnedSession + |> rsvp.expect_json(contract.response_decoder(), _) let new = Model(..model, loading: True) Continue(new, rsvp.post(contract.url, body, handler)) diff --git a/client/src/client/page/register_crew.gleam b/client/src/client/page/register_crew.gleam index f4ac8f1..71e1b40 100644 --- a/client/src/client/page/register_crew.gleam +++ b/client/src/client/page/register_crew.gleam @@ -60,7 +60,7 @@ pub type Msg { UserClickedSearchLeader // - ApiSuggestedLeaders(Result(List(User), rsvp.Error)) + ApiSuggestedLeaders(result: Result(List(User), rsvp.Error)) } pub fn update(model: Model, msg: Msg) -> #(Model, Effect(Msg)) { @@ -132,8 +132,8 @@ pub fn update(model: Model, msg: Msg) -> #(Model, Effect(Msg)) { let api = contract.autocomplete_url <> "?" <> query let effect = - decode.list(user.decoder()) - |> rsvp.expect_json(ApiSuggestedLeaders) + ApiSuggestedLeaders + |> rsvp.expect_json(decode.list(user.decoder()), _) |> rsvp.get(api, _) #(model, effect) diff --git a/client/src/client/page/signup.gleam b/client/src/client/page/signup.gleam index 3c8d239..5c64b0d 100644 --- a/client/src/client/page/signup.gleam +++ b/client/src/client/page/signup.gleam @@ -248,11 +248,11 @@ pub fn update(model: Model, msg: Msg) -> #(Model, Effect(Msg)) { |> contract.request_to_json() let effect = - rsvp.expect_json(contract.response_decoder(), ApiReturnedResponse) + ApiReturnedResponse + |> rsvp.expect_json(contract.response_decoder(), _) |> rsvp.post(contract.url, body, _) - let new = Model(..model, loading: True) - #(new, effect) + #(Model(..model, loading: True), effect) } ApiReturnedResponse(Ok(_created)) -> #(