apply logging only on GHC uninstalation

2023-04-14 17:31:28 +02:00 · 2023-04-14 17:31:28 +02:00 · 78d68e381a
commit 78d68e381a
parent 17ffc459db
1 changed files with 1 additions and 1 deletions
--- a/app/ghcup/BrickMain.hs
+++ b/app/ghcup/BrickMain.hs
@ -563,7 +563,7 @@ del' _ (_, ListResult {..}) = do
    )
    >>= \case
          VRight vi -> do
-            logGHCPostRm (mkTVer lVer)
+            when (lTool == GHC) $ logGHCPostRm (mkTVer lVer)
            forM_ (_viPostRemove =<< vi) $ \msg ->
              logInfo msg
            pure $ Right ()