diff --git a/lib/GHCup.hs b/lib/GHCup.hs
index 4ab43a6..8881029 100644
--- a/lib/GHCup.hs
+++ b/lib/GHCup.hs
@@ -1097,7 +1097,7 @@ setGHC ver sghc = do
         pure $ Just (file <> "-" <> verS)
 
     -- create symlink
-    forM mTargetFile $ \targetFile -> do
+    forM_ mTargetFile $ \targetFile -> do
       let fullF = binDir </> targetFile  <> exeExt
           fileWithExt = file <> exeExt
       destL <- lift $ ghcLinkDestination fileWithExt ver