diff options
author | Joris | 2019-10-20 21:31:57 +0200 |
---|---|---|
committer | Joris | 2019-10-20 21:31:57 +0200 |
commit | 602c52acfcfa494b07fec05c20b317b60ea8a6f3 (patch) | |
tree | 34fd9c44f82a83569822bc36eb2e0b04518e59f2 /client/src/View/SignIn.hs | |
parent | 7aadcc97f9df0e2daccbe8a8726d8bc6c63d67f4 (diff) | |
download | budget-602c52acfcfa494b07fec05c20b317b60ea8a6f3.tar.gz budget-602c52acfcfa494b07fec05c20b317b60ea8a6f3.tar.bz2 budget-602c52acfcfa494b07fec05c20b317b60ea8a6f3.zip |
Load init data per page with AJAX
Diffstat (limited to 'client/src/View/SignIn.hs')
-rw-r--r-- | client/src/View/SignIn.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/client/src/View/SignIn.hs b/client/src/View/SignIn.hs index 8c248bd..4fe495b 100644 --- a/client/src/View/SignIn.hs +++ b/client/src/View/SignIn.hs @@ -50,7 +50,7 @@ view signInMessage = let form = SignInForm <$> _inputOut_raw input (signInResult, waiting) <- WaitFor.waitFor - (Ajax.postJson "/api/askSignIn") + (Ajax.post "/api/askSignIn") (ValidationUtil.fireMaybe ((\f -> f <$ SignInValidation.signIn f) <$> form) validate) |