Add tool-requirements subcommand

2020-04-10 17:36:27 +02:00
parent 9602db31ab
commit c706a047ea
11 changed files with 241 additions and 10 deletions
--- a/lib/GHCup/Download.hs
+++ b/lib/GHCup/Download.hs
@@ -94,7 +94,7 @@ getDownloads :: ( FromJSONKey Tool
                , MonadFail m
                )
             => URLSource
-             -> Excepts '[JSONError , DownloadFailed] m GHCupDownloads
+             -> Excepts '[JSONError , DownloadFailed] m GHCupInfo
 getDownloads urlSource = do
  lift $ $(logDebug) [i|Receiving download info from: #{urlSource}|]
  case urlSource of