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