hasufell/ghcup-hs
1
1
Fork 0
Code Issues Pull Requests Releases Wiki Activity

update installHLS' usage in installHLSBindist

Browse Source
This commit is contained in:
Arjun Kathuria 2021-07-23 16:23:52 +05:30
parent 9686ee9826
commit 63f10a1871
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lib/GHCup.hs
View File

@ -627,7 +627,7 @@ installHLSBindist dlinfo ver = do
-- the subdir of the archive where we do the work -- the subdir of the archive where we do the work
workdir <- maybe (pure tmpUnpack) (liftE . intoSubdir tmpUnpack) (view dlSubdir dlinfo) 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 -- create symlink if this is the latest version
hlsVers <- lift $ fmap rights getInstalledHLSs hlsVers <- lift $ fmap rights getInstalledHLSs