aboutsummaryrefslogtreecommitdiff
path: root/src/client/elm/Model
diff options
context:
space:
mode:
authorJoris2016-03-23 00:45:33 +0100
committerJoris2016-03-23 00:46:53 +0100
commita11ad41b52ed3682d33382f2a378bf3294d688b2 (patch)
treef1d0f7835965ebcc6a61225186cad6b5de565bca /src/client/elm/Model
parent32db6a74d8578f993dd1cce3367fc7615ec730cd (diff)
Sign in token link to /
Diffstat (limited to 'src/client/elm/Model')
-rw-r--r--src/client/elm/Model/View/SignInView.elm6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/client/elm/Model/View/SignInView.elm b/src/client/elm/Model/View/SignInView.elm
index 0d69445..f72d05a 100644
--- a/src/client/elm/Model/View/SignInView.elm
+++ b/src/client/elm/Model/View/SignInView.elm
@@ -9,9 +9,9 @@ type alias SignInView =
, result : Maybe (Result String String)
}
-initSignInView : SignInView
-initSignInView =
+initSignInView : Maybe String -> SignInView
+initSignInView mbSignInError =
{ login = ""
, waitingServer = False
- , result = Nothing
+ , result = Maybe.map Err mbSignInError
}