diff --git a/app/ghcup/Main.hs b/app/ghcup/Main.hs index 5ddef19..81cd877 100644 --- a/app/ghcup/Main.hs +++ b/app/ghcup/Main.hs @@ -1033,7 +1033,10 @@ Report bugs at |] runLogger ($(logError) [i|Error fetching download info: #{e}|]) exitWith (ExitFailure 2) - runLogger $ checkForUpdates dls pfreq + + case optCommand of + Upgrade _ _ -> pure () + _ -> runLogger $ checkForUpdates dls pfreq