Lala

2020-03-01 12:54:46 +01:00
parent 12da293100
commit d598c42d19
3 changed files with 73 additions and 56 deletions
--- a/lib/GHCup/File.hs
+++ b/lib/GHCup/File.hs
@@ -196,8 +196,7 @@ mkGhcupTmpDir = do
  parseAbs tmp


-withGHCupTmpDir :: (MonadResource m, MonadThrow m, MonadIO m)
-                => m (Path Abs)
+withGHCupTmpDir :: (MonadResource m, MonadThrow m, MonadIO m) => m (Path Abs)
 withGHCupTmpDir = snd <$> allocate mkGhcupTmpDir deleteDirRecursive