@@ -486,8 +486,8 @@ instance FromHttpApiData Void where
486486 parseUrlPiece _ = Left "Void cannot be parsed!"
487487#endif
488488
489−instance FromHttpApiData Bool where parseUrlPiece = parseBoundedTextData
490−instance FromHttpApiData Ordering where parseUrlPiece = parseBoundedTextData
489+instance FromHttpApiData Bool where parseUrlPiece = parseBoundedUrlPiece
490+instance FromHttpApiData Ordering where parseUrlPiece = parseBoundedUrlPiece
491491instance FromHttpApiData Double where parseUrlPiece = runReader rational
492492instance FromHttpApiData Float where parseUrlPiece = runReader rational
493493instance FromHttpApiData Int where parseUrlPiece = parseBounded (signed decimal)