aboutsummaryrefslogtreecommitdiff
path: root/src/client/elm/Update/SignIn.elm
diff options
context:
space:
mode:
authorJoris2016-01-03 00:19:55 +0100
committerJoris2016-01-03 00:28:41 +0100
commit0cba27cba2b44756389d50bc113f23a2be87e978 (patch)
treecc13e5ba32e3e2ec8bad284828a06d5daedec4f7 /src/client/elm/Update/SignIn.elm
parentfc9a3ca6a5226f78a3a0ec51af3d8d287ccb2e1b (diff)
downloadbudget-0cba27cba2b44756389d50bc113f23a2be87e978.tar.gz
budget-0cba27cba2b44756389d50bc113f23a2be87e978.tar.bz2
budget-0cba27cba2b44756389d50bc113f23a2be87e978.zip
Prevent to send multiple payments if the server is not answering
Diffstat (limited to 'src/client/elm/Update/SignIn.elm')
-rw-r--r--src/client/elm/Update/SignIn.elm6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/client/elm/Update/SignIn.elm b/src/client/elm/Update/SignIn.elm
index 5e8a9bb..94963c8 100644
--- a/src/client/elm/Update/SignIn.elm
+++ b/src/client/elm/Update/SignIn.elm
@@ -8,10 +8,10 @@ import Model.View.SignInView exposing (..)
updateSignIn : SignInAction -> SignInView -> SignInView
updateSignIn action signInView =
case action of
- Connecting ->
- { signInView | connecting = True }
+ WaitingServer ->
+ { signInView | waitingServer = True }
ErrorLogin message ->
{ signInView
| error = Just message
- , connecting = False
+ , waitingServer = False
}