aboutsummaryrefslogtreecommitdiff
path: root/client/src/View/SignIn.hs
diff options
context:
space:
mode:
Diffstat (limited to 'client/src/View/SignIn.hs')
-rw-r--r--client/src/View/SignIn.hs2
1 files changed, 2 insertions, 0 deletions
diff --git a/client/src/View/SignIn.hs b/client/src/View/SignIn.hs
index 912aea2..21d0fcc 100644
--- a/client/src/View/SignIn.hs
+++ b/client/src/View/SignIn.hs
@@ -30,8 +30,10 @@ view signInMessage =
rec
input <- Component.input $ InputIn
{ _inputIn_reset = R.ffilter Either.isRight signInResult
+ , _inputIn_hasResetButton = True
, _inputIn_label = Msg.get Msg.SignIn_EmailLabel
, _inputIn_initialValue = ""
+ , _inputIn_inputType = "text"
}
button <- Component.button $