Fix closing thread postgresql connections
This commit is contained in:
parent
9fc5821180
commit
ca1e4819b6
1 changed files with 1 additions and 2 deletions
|
|
@ -153,8 +153,7 @@
|
||||||
(pg-conn-finish conn)
|
(pg-conn-finish conn)
|
||||||
(hash-remove! (%postgresql-connections-hash-table)
|
(hash-remove! (%postgresql-connections-hash-table)
|
||||||
(current-thread))
|
(current-thread))
|
||||||
(fluid-set! %thread-postgresql-connection
|
(fluid-set! %thread-postgresql-connection #f))))
|
||||||
conn))))
|
|
||||||
|
|
||||||
(define* (with-postgresql-transaction conn f
|
(define* (with-postgresql-transaction conn f
|
||||||
#:key always-rollback?)
|
#:key always-rollback?)
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue