attempt to fix 8.2

This commit is contained in:
Maximilian Tagher 2020-06-20 17:27:13 -04:00
parent 4ddff42847
commit 28e5b606b2

View File

@ -18,6 +18,7 @@ import qualified Data.Text.Encoding as TE
import qualified Data.Text.Lazy as TL
import qualified Data.Text.Lazy.Encoding as DTLE
import qualified Yesod.Core.Content as Content
import Data.Semigroup (Semigroup(..))
-- | Helper function to get the first 1024 characters of the body, assuming it is UTF-8.
-- This function is used to preview the body in case of an assertion failure.