From d42d38990d3501f93d1526a1eb82cfe9b208f30b Mon Sep 17 00:00:00 2001
From: Alex Kardos <alexander.kardos@gmail.com>
Date: Sat, 5 Mar 2016 16:58:34 -0700
Subject: [PATCH] Added translated label to default register handler

This was removed on accident.
---
 yesod-auth/Yesod/Auth/Email.hs | 1 +
 1 file changed, 1 insertion(+)

diff --git a/yesod-auth/Yesod/Auth/Email.hs b/yesod-auth/Yesod/Auth/Email.hs
index 67b45bab..c705c0e1 100644
--- a/yesod-auth/Yesod/Auth/Email.hs
+++ b/yesod-auth/Yesod/Auth/Email.hs
@@ -360,6 +360,7 @@ defaultRegisterHandler = do
             let widget = do
                 [whamlet|
                     #{extra}
+                    ^{fvLabel emailView}
                     ^{fvInput emailView}
                 |]