haskell/yesod
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Whitespace.

Browse Source
This commit is contained in:
Felipe Lessa 2014-02-25 19:10:02 -03:00
parent 71558d3342
commit 9f7031d9dd
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
yesod-auth/Yesod/Auth/Email.hs
View File

@ -394,7 +394,7 @@ postPasswordR = do
Just aid -> return aid Just aid -> return aid
tm <- getRouteToParent tm <- getRouteToParent
needOld <- lift $ needOldPassword aid needOld <- lift $ needOldPassword aid
when needOld $ do when needOld $ do
current <- lift $ runInputPost $ ireq textField "current" current <- lift $ runInputPost $ ireq textField "current"