From ed5037fa749402de728bdcedc8b627171853d426 Mon Sep 17 00:00:00 2001 From: Alex Kardos Date: Sat, 20 Feb 2016 13:38:19 -0700 Subject: [PATCH] Used localized email label --- yesod-auth/Yesod/Auth/Email.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/yesod-auth/Yesod/Auth/Email.hs b/yesod-auth/Yesod/Auth/Email.hs index 1316c4be..7792413c 100644 --- a/yesod-auth/Yesod/Auth/Email.hs +++ b/yesod-auth/Yesod/Auth/Email.hs @@ -315,8 +315,8 @@ defaultRegisterHandler = do where registrationForm extra = do let emailSettings = FieldSettings { - fsLabel = "Email" , fsTooltip = Nothing , + fsLabel = SomeMessage Msg.Email, fsId = Just "email", fsName = Just "email", fsAttrs = []