From 5a74104e6a5d074597737d02ec09f20e6815912d Mon Sep 17 00:00:00 2001
From: Chris Penner <christopher.penner@gmail.com>
Date: Tue, 4 Feb 2025 20:56:12 -0800
Subject: [PATCH] Progress tick on negotiation

---
 unison-cli/src/Unison/Share/SyncV2.hs | 1 +
 1 file changed, 1 insertion(+)

diff --git a/unison-cli/src/Unison/Share/SyncV2.hs b/unison-cli/src/Unison/Share/SyncV2.hs
index 7ec0181ae4..d3b215c4a2 100644
--- a/unison-cli/src/Unison/Share/SyncV2.hs
+++ b/unison-cli/src/Unison/Share/SyncV2.hs
@@ -569,6 +569,7 @@ negotiateKnownCausals ::
   Cli (Either (SyncError SyncV2.PullError) (Set Hash32))
 negotiateKnownCausals unisonShareUrl branchRef hashJwt = do
   Cli.Env {authHTTPClient, codebase} <- ask
+  liftIO $ Text.hPutStrLn IO.stderr $ "  🔎  Identifying missing entities..."
   Timing.time "Causal Negotiation" $ do
     liftIO . C.runResourceT . runExceptT $ httpStreamCausalDependencies
       authHTTPClient