fix: Restore showing LISTEN pgrst in pg_stat_activity

This commit is contained in:
Michal Kleczek
2026-04-30 17:21:12 -05:00
committed by GitHub
parent 5f6f7dca44
commit 04a0e041e4
3 changed files with 36 additions and 1 deletions
+1 -1
View File
@@ -68,9 +68,9 @@ retryingListen appState = do
-- use connection
\case
Right db -> do
SQL.listen db $ SQL.toPgIdentifier dbChannel
(pqHost, pqPort) <- SQL.withLibPQConnection db $ bisequence . (LibPQ.host &&& LibPQ.port)
pgFullName <- SQL.run queryPgVersion db >>= either throwIO (pure . pgvFullName)
SQL.listen db $ SQL.toPgIdentifier dbChannel
AppState.putIsListenerOn appState True