yesod-auth 1.1.2.1 → 1.1.2.2

raw patch · 2 files changed

+12/−7 lines, 2 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

• Yesod/Auth/Email.hs +11/−6
• yesod-auth.cabal +1/−1

@@ -110,14 +110,15 @@ getRegisterR :: YesodAuthEmail master => GHandler Auth master RepHtml getRegisterR = do     toMaster <- getRouteToMaster+    email <- newIdent     defaultLayout $ do         setTitleI Msg.RegisterLong         [whamlet| $newline never <p>_{Msg.EnterEmail} <form method="post" action="@{toMaster registerR}">-    <label for="email">_{Msg.Email}-    <input type="email" name="email" width="150">+    <label for=#{email}>_{Msg.Email}+    <input ##{email} type="email" name="email" width="150">     <input type="submit" value=_{Msg.Register}> |] @@ -200,6 +201,8 @@ getPasswordR = do     toMaster <- getRouteToMaster     maid <- maybeAuthId+    pass1 <- newIdent+    pass2 <- newIdent     case maid of         Just _ -> return ()         Nothing -> do@@ -213,13 +216,15 @@ <form method="post" action="@{toMaster setpassR}">     <table>         <tr>-            <th>_{Msg.NewPass}+            <th>+                <label for=#{pass1}>_{Msg.NewPass}             <td>-                <input type="password" name="new">+                <input ##{pass1} type="password" name="new">         <tr>-            <th>_{Msg.ConfirmPass}+            <th>+                <label for=#{pass2}>_{Msg.ConfirmPass}             <td>-                <input type="password" name="confirm">+                <input ##{pass2} type="password" name="confirm">         <tr>             <td colspan="2">                 <input type="submit" value="_{Msg.SetPassTitle}">

@@ -1,5 +1,5 @@ name:            yesod-auth-version:         1.1.2.1+version:         1.1.2.2 license:         MIT license-file:    LICENSE author:          Michael Snoyman, Patrick Brisbin