@@ -334,7 +334,7 @@ lookupBoundedEnumOf f = flip lookup (map (f &&& id) [minBound..maxBound])
334-- >>> parseBoundedEnumOf toUrlPiece "true" :: Either Text Bool
334-- >>> parseBoundedEnumOf toUrlPiece "true" :: Either Text Bool
335-- Right True
335-- Right True
337−-- For case sensitive parser see 'parseBoundedEnumOfI'.
337+-- For case insensitive parser see 'parseBoundedEnumOfI'.
338parseBoundedEnumOf :: (Bounded a, Enum a) => (a -> Text) -> Text -> Either Text a
338parseBoundedEnumOf :: (Bounded a, Enum a) => (a -> Text) -> Text -> Either Text a
339parseBoundedEnumOf = parseMaybeTextData . lookupBoundedEnumOf
339parseBoundedEnumOf = parseMaybeTextData . lookupBoundedEnumOf