universal-ctags: Add version path segment

… to the download URL.
This commit is contained in:
2023-09-25 10:18:00 +02:00
parent ec704e267b
commit 7c499bd3f7
4 changed files with 16 additions and 10 deletions

View File

@ -109,7 +109,7 @@ latestPackagist PackagistArguments{..} = do
latestText :: TextArguments -> SlackBuilderT (Maybe Text)
latestText (TextArguments textArguments) = do
uri <- liftIO $ useHttpsURI <$> mkURI textArguments
packagistResponse <- traverse (runReq defaultHttpConfig) $ go . fst <$> uri
packagistResponse <- traverse (runReq defaultHttpConfig . go . fst) uri
pure $ Text.strip . Text.Encoding.decodeASCII . responseBody
<$> packagistResponse