Only check for upgrades when not upgrading

2020-07-19 00:47:20 +02:00 · 2020-07-19 00:47:20 +02:00 · cfe24428fa
commit cfe24428fa
parent 4c4266dd8c
1 changed files with 4 additions and 1 deletions
--- a/app/ghcup/Main.hs
+++ b/app/ghcup/Main.hs
@ -1033,7 +1033,10 @@ Report bugs at <https://gitlab.haskell.org/haskell/ghcup-hs/issues>|]
                      runLogger
                        ($(logError) [i|Error fetching download info: #{e}|])
                      exitWith (ExitFailure 2)
-          runLogger $ checkForUpdates dls pfreq
+
+          case optCommand of
+            Upgrade _ _ -> pure ()
+            _ -> runLogger $ checkForUpdates dls pfreq