Allow to set downloader

2020-04-29 19:12:58 +02:00
parent f83dcbc430
commit 0ff7ebb1fd
8 changed files with 126 additions and 30 deletions
--- a/lib/GHCup/Utils.hs
+++ b/lib/GHCup/Utils.hs
@@ -311,6 +311,10 @@ getCache :: MonadReader Settings m => m Bool
 getCache = ask <&> cache


+getDownloader :: MonadReader Settings m => m Downloader
+getDownloader = ask <&> downloader
+
+

    -------------
    --[ Other ]--