feat: log schema cache load time

This commit is contained in:
steve-chavez
2024-02-21 18:16:37 -05:00
committed by Steve Chavez
parent 1a141c19df
commit 3a3601cbeb
3 changed files with 8 additions and 4 deletions
+2 -1
View File
@@ -310,7 +310,8 @@ loadSchemaCache appState observer = do
Right sCache -> do
putSchemaCache appState $ Just sCache
observer $ SchemaCacheQueriedObs resultTime
observer $ SchemaCacheLoadedObs sCache
(t, _) <- timeItT $ observer $ SchemaCacheSummaryObs sCache
observer $ SchemaCacheLoadedObs t
return SCLoaded
-- | Current database connection status data ConnectionStatus