impossible condition

This commit is contained in:
nek0 2016-12-03 18:50:58 +01:00
parent 8323c044e1
commit 04176a3e42

View file

@ -33,8 +33,7 @@ postReactivateR = do
case result of
FormSuccess temp -> do
users <- runDB $ selectList [UserEmail ==. temp] []
if
null users
if not $ null users
then do
userTokens <- foldM (\userTokens (Entity userId user) -> do
token <- liftIO $ generateString