-- TODO: move to separate module
eitherDecodeBs :: FromJSON a => BS.ByteString -> Either String a
eitherDecodeBs = eitherDecode . bsToLbs
eitherDecodeBs :: FromJSON a => BS.ByteString -> Either String a
eitherDecodeBs = eitherDecode . bsToLbs
eitherDecodeBs = eitherDecode . bsToLbs