diff --git a/hbs21-git/hbs2-git-client-lib/HBS2/Git/Client/Import.hs b/hbs21-git/hbs2-git-client-lib/HBS2/Git/Client/Import.hs index fd758b41..f995c8c8 100644 --- a/hbs21-git/hbs2-git-client-lib/HBS2/Git/Client/Import.hs +++ b/hbs21-git/hbs2-git-client-lib/HBS2/Git/Client/Import.hs @@ -95,6 +95,9 @@ importRepoWait lwwKey = do Just (LWWBlockData{..}) -> do void $ try @_ @SomeException (getRefLogMerkle lwwRefLogPubKey) + subscribeRefLog lwwRefLogPubKey + pause @'Seconds 0.25 + getRefLogMerkle lwwRefLogPubKey next (IWaitRefLog 20 lwwRefLogPubKey) IWaitRefLog w puk | w <= 0 -> do