Progress tick on negotiation

unisonweb · Feb 5, 2025 · 5a74104 · 5a74104
1 parent 17b2500
commit 5a74104
Showing 1 changed file with 1 addition and 0 deletions.
diff --git 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