From 13f61ccaacaa9b84e4d33102845a518f0da5c6a6 Mon Sep 17 00:00:00 2001 From: zowoq <59103226+zowoq@users.noreply.github.com> Date: Sun, 9 Apr 2023 18:28:04 +1000 Subject: [PATCH] fix ofborg url https://github.com/NixOS/ofborg/commit/0f34038feb9b0ae9959c865608700c91d57b2590 https://github.com/ofborg/infrastructure/commit/dc29ac3cb544bbd3eda84e62c6f04c1484d5b969 --- src/Update.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/Update.hs b/src/Update.hs index 53f2c36a..53833b33 100644 --- a/src/Update.hs +++ b/src/Update.hs @@ -599,13 +599,13 @@ jqBin = fromJust ($$(envQ "JQ") :: Maybe String) <> "/bin/jq" untilOfBorgFree :: MonadIO m => (Text -> IO ()) -> m () untilOfBorgFree log = do stats <- - shell "curl -s https://events.nix.ci/stats.php" & readProcessInterleaved_ + shell "curl -s https://events.ofborg.org/stats.php" & readProcessInterleaved_ waiting <- shell (jqBin <> " .evaluator.messages.waiting") & setStdin (byteStringInput stats) & readProcessInterleaved_ & fmap (BSL.readInt >>> fmap fst >>> fromMaybe 0) when (waiting > 2) $ do - liftIO $ log ("Waiting for OfBorg: https://events.nix.ci/stats.php's evaluator.messages.waiting = " <> tshow waiting) + liftIO $ log ("Waiting for OfBorg: https://events.ofborg.org/stats.php's evaluator.messages.waiting = " <> tshow waiting) liftIO $ threadDelay 60000000 untilOfBorgFree log