improves logging

This commit is contained in:
Keagan McClelland
2021-09-28 17:59:28 -06:00
parent c7cb76092a
commit 79329797e3
8 changed files with 66 additions and 6 deletions

View File

@@ -173,6 +173,7 @@ extractPkg fp = (`onException` cleanup) $ do
watchPkgRepoRoot :: (MonadUnliftIO m, MonadReader r m, Has PkgRepo r, MonadLoggerIO m) => m (IO Bool)
watchPkgRepoRoot = do
$logInfo "Starting FSNotify Watch Manager"
root <- asks pkgRepoFileRoot
runInIO <- askRunInIO
box <- newEmptyMVar @_ @()