aboutsummaryrefslogtreecommitdiff
path: root/src/client/elm/Model/View/LoggedIn
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/Model/View/LoggedIn
parentfc9a3ca6a5226f78a3a0ec51af3d8d287ccb2e1b (diff)
Prevent to send multiple payments if the server is not answering
Diffstat (limited to 'src/client/elm/Model/View/LoggedIn')
-rw-r--r--src/client/elm/Model/View/LoggedIn/AddPayment.elm2
1 files changed, 2 insertions, 0 deletions
diff --git a/src/client/elm/Model/View/LoggedIn/AddPayment.elm b/src/client/elm/Model/View/LoggedIn/AddPayment.elm
index fc4d3a0..3a14b00 100644
--- a/src/client/elm/Model/View/LoggedIn/AddPayment.elm
+++ b/src/client/elm/Model/View/LoggedIn/AddPayment.elm
@@ -18,6 +18,7 @@ type alias AddPayment =
, cost : String
, costError : Maybe String
, frequency : PaymentFrequency
+ , waitingServer : Bool
}
initAddPayment : PaymentFrequency -> AddPayment
@@ -27,6 +28,7 @@ initAddPayment frequency =
, cost = ""
, costError = Nothing
, frequency = frequency
+ , waitingServer = False
}
validateName : String -> Translations -> Result String String