@@ -173,8 +173,8 @@ parseUrlPieceWithPrefix pattern input
174-- | Parse given bytestring then parse the rest of the input using @'parseHeader'@.
174-- | Parse given bytestring then parse the rest of the input using @'parseHeader'@.
176+-- >>> data BasicAuthToken = BasicAuthToken Text deriving (Show)
177−-- data BasicAuthToken = BasicAuthToken Text deriving (Show)
178-- instance FromHttpApiData BasicAuthToken where
178-- instance FromHttpApiData BasicAuthToken where
179-- parseHeader h = BasicAuthToken <$> parseHeaderWithPrefix "Basic " h
179-- parseHeader h = BasicAuthToken <$> parseHeaderWithPrefix "Basic " h
180-- parseQueryParam p = BasicAuthToken <$> parseQueryParam p
180-- parseQueryParam p = BasicAuthToken <$> parseQueryParam p