Fix hlint warnings

2021-09-11 19:57:42 -04:00
parent 13aca91231
commit eddda55fe6
1 changed files with 2 additions and 2 deletions
--- a/lib/GHCup.hs
+++ b/lib/GHCup.hs
@@ -869,7 +869,7 @@ setGHC ver sghc = do
  when (isNothing . _tvTarget $ ver) $ lift $ symlinkShareDir ghcdir verS

  case sghc of
-    SetGHCOnly -> lift $ warnAboutHlsCompatibility
+    SetGHCOnly -> lift warnAboutHlsCompatibility
    _          -> return ()

  pure ver
@@ -982,7 +982,7 @@ setHLS ver = do

  lift $ createLink destL wrapper

-  lift $ warnAboutHlsCompatibility
+  lift warnAboutHlsCompatibility

  pure ()