Don't timeout when trying to get stats for resource pools
This commit is contained in:
parent
53437cff14
commit
00a5a0a404
1 changed files with 1 additions and 1 deletions
|
|
@ -313,7 +313,7 @@ port. Also, the port used can be changed by passing the --port option.\n"
|
||||||
(spawn-fiber
|
(spawn-fiber
|
||||||
(lambda ()
|
(lambda ()
|
||||||
(let* ((pool (resource-pool-timeout-error-pool exn))
|
(let* ((pool (resource-pool-timeout-error-pool exn))
|
||||||
(stats (resource-pool-stats pool)))
|
(stats (resource-pool-stats pool #:timeout #f)))
|
||||||
(simple-format (current-error-port)
|
(simple-format (current-error-port)
|
||||||
"resource pool timeout error: ~A, ~A\n"
|
"resource pool timeout error: ~A, ~A\n"
|
||||||
pool
|
pool
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue