@@ -174,7 +174,7 @@ 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'@.
177−-- newtype 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