From eddda55fe6f810cec6a0bba5f9c73387e6afe74d Mon Sep 17 00:00:00 2001
From: Chris Smith <cdsmith@gmail.com>
Date: Sat, 11 Sep 2021 19:57:42 -0400
Subject: [PATCH] Fix hlint warnings

---
 lib/GHCup.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lib/GHCup.hs b/lib/GHCup.hs
index 1ecb395..6137bce 100644
--- 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 ()