diff --git a/hbs2-fixer/app/Main.hs b/hbs2-fixer/app/Main.hs index f246e39e..dc57350b 100644 --- a/hbs2-fixer/app/Main.hs +++ b/hbs2-fixer/app/Main.hs @@ -188,6 +188,7 @@ withApp cfgPath action = do sink <- newNotifySink + -- FIXME: ASAP-subscribe-again-if-peer-is-gone void $ ContT $ withAsync $ flip runReaderT clientN $ do debug $ red "notify restarted!" runNotifyWorkerClient sink