haskell/yesod
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Used localized email label

Browse Source
This commit is contained in:
Alex Kardos 2016-02-20 13:38:19 -07:00
parent 3e37983f1c
commit ed5037fa74
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
yesod-auth/Yesod/Auth/Email.hs
View File

@ -315,8 +315,8 @@ defaultRegisterHandler = do
where where
registrationForm extra = do registrationForm extra = do
let emailSettings = FieldSettings { let emailSettings = FieldSettings {
fsLabel = "Email" ,
fsTooltip = Nothing , fsTooltip = Nothing ,
fsLabel = SomeMessage Msg.Email,
fsId = Just "email", fsId = Just "email",
fsName = Just "email", fsName = Just "email",
fsAttrs = [] fsAttrs = []