Added translated label to default register handler

This was removed on accident.

yesod-auth/Yesod/Auth/Email.hs

@@ -360,6 +360,7 @@ defaultRegisterHandler = do
             let widget = do
                 [whamlet|
                     #{extra}
+                    ^{fvLabel emailView}
                     ^{fvInput emailView}
                 |]