From 0d118e2fe1b0d657e124d2607e70f303debd1f01 Mon Sep 17 00:00:00 2001
From: Arjun Kathuria <arjun.kathuria8@gmail.com>
Date: Fri, 23 Jul 2021 16:23:52 +0530
Subject: [PATCH] update installHLS' usage in `installHLSBindist`

---
 lib/GHCup.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/GHCup.hs b/lib/GHCup.hs
index b859950..b34a76d 100644
--- a/lib/GHCup.hs
+++ b/lib/GHCup.hs
@@ -627,7 +627,7 @@ installHLSBindist dlinfo ver = do
   -- the subdir of the archive where we do the work
   workdir <- maybe (pure tmpUnpack) (liftE . intoSubdir tmpUnpack) (view dlSubdir dlinfo)
 
-  liftE $ installHLS' workdir binDir
+  liftE $ installHLS' workdir binDir ver
 
   -- create symlink if this is the latest version
   hlsVers <- lift $ fmap rights getInstalledHLSs