Commit 30143611 authored by Karen Konou's avatar Karen Konou

[UserInfo] Post to correct id on update

parent a1ec877b
...@@ -127,7 +127,8 @@ userLayoutWithKeyCpt = here.component "userLayoutWithKey" cpt where ...@@ -127,7 +127,8 @@ userLayoutWithKeyCpt = here.component "userLayoutWithKey" cpt where
onUpdateUserInfo :: T.Box (Array FrontendError) -> T2.ReloadS -> UserInfo -> Effect Unit onUpdateUserInfo :: T.Box (Array FrontendError) -> T2.ReloadS -> UserInfo -> Effect Unit
onUpdateUserInfo errors reload ui = do onUpdateUserInfo errors reload ui = do
launchAff_ $ do launchAff_ $ do
res <- saveUserInfo session nodeId ui let Session {userId} = session
res <- saveUserInfo session userId ui
handleRESTError errors res $ \_ -> handleRESTError errors res $ \_ ->
liftEffect $ T2.reload reload liftEffect $ T2.reload reload
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment