diff --git a/src/Foundation/Yesod/ErrorHandler.hs b/src/Foundation/Yesod/ErrorHandler.hs index 52162aaac..770687a8c 100644 --- a/src/Foundation/Yesod/ErrorHandler.hs +++ b/src/Foundation/Yesod/ErrorHandler.hs @@ -89,7 +89,7 @@ errorHandler err = do NotFound -> [whamlet|

_{MsgErrorResponseNotFound}|] InternalError err' | "Crash Button" `isPrefixOf` err' -> liftIO $ exitImmediately ExitSuccess -- DEBUG: just for Testing - | otherwise -> encrypted err' [whamlet|

TEST -#{err'}- -#{show decrypted}- #{fromMaybe err' decrypted}|] + | otherwise -> encrypted err' [whamlet|

#{fromMaybe err' decrypted}|] InvalidArgs errs -> [whamlet|