getStreamingResponse path client = do
  req <- liftIO $ mkHastodonRequest path client
  httpSource req getResponseBody .| parseStream
getStreamingResponse path client = do
  req <- liftIO $ mkHastodonRequest path client
  httpSource req getResponseBody .| parseStream
getStreamingResponse path client = do
  req <- liftIO $ mkHastodonRequest path client
  httpSource req getResponseBody .| parseStream