aboutsummaryrefslogtreecommitdiff
path: root/src/client/elm/Model/View
diff options
context:
space:
mode:
Diffstat (limited to 'src/client/elm/Model/View')
-rw-r--r--src/client/elm/Model/View/SignInView.elm10
1 files changed, 6 insertions, 4 deletions
diff --git a/src/client/elm/Model/View/SignInView.elm b/src/client/elm/Model/View/SignInView.elm
index a950867..0d69445 100644
--- a/src/client/elm/Model/View/SignInView.elm
+++ b/src/client/elm/Model/View/SignInView.elm
@@ -4,12 +4,14 @@ module Model.View.SignInView
) where
type alias SignInView =
- { waitingServer : Bool
- , error : Maybe String
+ { login : String
+ , waitingServer : Bool
+ , result : Maybe (Result String String)
}
initSignInView : SignInView
initSignInView =
- { waitingServer = False
- , error = Nothing
+ { login = ""
+ , waitingServer = False
+ , result = Nothing
}