Name the resource pools

This commit is contained in:
Christopher Baines 2024-08-14 20:12:19 +01:00
parent bfb4ff3101
commit b2dcccb264

View file

@ -175,6 +175,7 @@ port. Also, the port used can be changed by passing the --port option.\n"
"web"
postgresql-statement-timeout))
(floor (/ postgresql-connections 2))
#:name "web"
#:idle-seconds 30
#:destructor
(lambda (conn)
@ -187,6 +188,7 @@ port. Also, the port used can be changed by passing the --port option.\n"
"web-reserved"
postgresql-statement-timeout))
(floor (/ postgresql-connections 2))
#:name "web-reserved"
#:idle-seconds 600
#:destructor
(lambda (conn)