improves logging

This commit is contained in:
Keagan McClelland
2021-09-28 17:59:28 -06:00
parent 50ecce1c21
commit 427c31c886
8 changed files with 67 additions and 9 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 @_ @()