search

bitemyapp / esqueleto

New home of Esqueleto, please file issues so we can get things caught up!
BSD 3-Clause "New" or "Revised" License
376 stars 108 forks source link

use `decodeUtf8'` in JSONB's PersistField instance #338

Open Vlix opened 2 years ago

Vlix commented 2 years ago 
first (badParse $ TE.decodeUtf8 bs) $ eitherDecodeStrict bs

could probably be

import Data.Either (fromRight)
...
first (badParse (fromRight "<Invalid UTF-8>" $ TE.decodeUtf8' bs)) $ eitherDecodeStrict bs