diff options
| -rw-r--r-- | src/Main.purs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/Main.purs b/src/Main.purs index 87a3ccf..02d1b08 100644 --- a/src/Main.purs +++ b/src/Main.purs @@ -237,12 +237,12 @@ mainAuth = launchAff_ do liftEffect $ Ev.preventDefault ev usernameInp <- byId "lcolonq-auth-username" passwordInp <- byId "lcolonq-auth-password" - user <- getValue usernameInp - pass <- getValue passwordInp + username <- getValue usernameInp + password <- getValue passwordInp { text: resp } <- fetch ("/api/firstfactor") { method: POST , headers: { "Content-Type": "application/json" } - , body: UI.toJSON { user, pass } + , body: UI.toJSON { username, password } } res <- resp liftEffect $ log res |