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 as TL
import qualified Data.Text.Lazy.Encoding as DTLE import qualified Data.Text.Lazy.Encoding as DTLE
import qualified Yesod.Core.Content as Content 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. -- | 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. -- This function is used to preview the body in case of an assertion failure.