fixed error with account reactivation

This commit is contained in:
nek0 2015-02-12 00:15:35 +01:00
parent 1dd08f9f59
commit ee8b46b26b
2 changed files with 8 additions and 7 deletions

View file

@ -23,7 +23,7 @@ import Data.Text.Encoding
getReactivateR :: Handler Html getReactivateR :: Handler Html
getReactivateR = do getReactivateR = do
(reactivateWidget, enctype) <- generateFormPost reactivateForm (reactivateWidget, enctype) <- generateFormPost reactivateForm
defaultLayout $ do formLayout $ do
setTitle "Eidolon :: Reactivate account" setTitle "Eidolon :: Reactivate account"
$(widgetFile "reactivate") $(widgetFile "reactivate")

View file

@ -1,5 +1,6 @@
$newline always $newline always
<div id="header" class="item" data-width="400">
<div class="inner">
<h3>Reset Password <h3>Reset Password
<form method="post" enctype=#{enctype}> <form method="post" enctype=#{enctype}>