--- stack-2.9.3.1/src/Stack/Config.hs~	2023-06-23 02:42:33.000000000 +0800
+++ stack-2.9.3.1/src/Stack/Config.hs	2024-07-08 14:47:57.644375532 +0800
@@ -214,7 +214,7 @@
      configWorkDir0 <- maybe (pure relDirStackWork) (liftIO . parseRelDir) mstackWorkEnv
      let configWorkDir = fromFirst configWorkDir0 configMonoidWorkDir
          configLatestSnapshot = fromFirst
-           "https://s3.amazonaws.com/haddock.stackage.org/snapshots.json"
+           "https://www.stackage.org/download/snapshots.json"
            configMonoidLatestSnapshot
          clConnectionCount = fromFirst 8 configMonoidConnectionCount
          configHideTHLoading = fromFirstTrue configMonoidHideTHLoading