diff options
Diffstat (limited to 'src/client/elm/Model/View')
-rw-r--r-- | src/client/elm/Model/View/LoggedIn/AddPayment.elm | 2 | ||||
-rw-r--r-- | src/client/elm/Model/View/SignInView.elm | 4 |
2 files changed, 4 insertions, 2 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 diff --git a/src/client/elm/Model/View/SignInView.elm b/src/client/elm/Model/View/SignInView.elm index cf7e6b2..a950867 100644 --- a/src/client/elm/Model/View/SignInView.elm +++ b/src/client/elm/Model/View/SignInView.elm @@ -4,12 +4,12 @@ module Model.View.SignInView ) where type alias SignInView = - { connecting : Bool + { waitingServer : Bool , error : Maybe String } initSignInView : SignInView initSignInView = - { connecting = False + { waitingServer = False , error = Nothing } |