From 6011242eae424b049284e26916101067e869ce02 Mon Sep 17 00:00:00 2001
From: Arjun Kathuria <arjun.kathuria8@gmail.com>
Date: Sat, 11 Sep 2021 23:23:58 +0530
Subject: [PATCH] minor cleanup

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

diff --git a/lib/GHCup.hs b/lib/GHCup.hs
index 4b18208..92bc402 100644
--- a/lib/GHCup.hs
+++ b/lib/GHCup.hs
@@ -487,9 +487,7 @@ checkIfToolInstalled :: ( MonadIO m
                         Version ->
                         m Bool
 
-checkIfToolInstalled tool ver = do
-  Dirs { binDir } <- getDirs
-
+checkIfToolInstalled tool ver =
   case tool of
     Cabal -> cabalInstalled ver
     HLS   -> hlsInstalled ver