Fix HLS not cleaning up after failed install, fix haskell#361

arjunkathuria · May 11, 2022 · 5130cb0 · 5130cb0
1 parent 991e540
commit 5130cb0
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/lib/GHCup.hs b/lib/GHCup.hs
@@ -627,7 +627,8 @@ installHLSBindist dlinfo ver installDir forceInstall = do
       then liftE $ installHLSUnpackedLegacy workdir (GHCupDir binDir) ver forceInstall
       else do
         inst <- ghcupHLSDir ver
-        liftE $ runBuildAction tmpUnpack Nothing $ installHLSUnpacked workdir (GHCupDir inst) ver
+        liftE $ runBuildAction tmpUnpack (Just inst)
+              $ installHLSUnpacked workdir (GHCupDir inst) ver
         liftE $ setHLS ver SetHLS_XYZ Nothing