updates installStack' usage in installStackBindist function

This commit is contained in:
Arjun Kathuria 2021-07-23 16:44:40 +05:30
parent 42d4a66493
commit 873f75da9f

View File

@ -847,7 +847,7 @@ installStackBindist dlinfo ver = do
-- the subdir of the archive where we do the work
workdir <- maybe (pure tmpUnpack) (liftE . intoSubdir tmpUnpack) (view dlSubdir dlinfo)
liftE $ installStack' workdir binDir
liftE $ installStack' workdir binDir ver
-- create symlink if this is the latest version
sVers <- lift $ fmap rights getInstalledStacks