From 6265c37e896e966a7deee5bdb2e9df8565f7dd55 Mon Sep 17 00:00:00 2001 From: Christopher Baines Date: Thu, 31 Oct 2024 17:07:39 +0000 Subject: Increase the sleep-operation time for telling waiters to retry As this being too short was leading call-with-resource-pool to get stuck. --- guix-data-service/utils.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/guix-data-service/utils.scm b/guix-data-service/utils.scm index bd5009d..5436eb8 100644 --- a/guix-data-service/utils.scm +++ b/guix-data-service/utils.scm @@ -281,7 +281,7 @@ (perform-operation (choice-operation (put-operation waiter 'resource-pool-retry-checkout) - (sleep-operation 0.2)))))) + (sleep-operation 10)))))) waiters) (loop resources @@ -306,7 +306,7 @@ (perform-operation (choice-operation (put-operation waiter 'resource-pool-retry-checkout) - (sleep-operation 0.2)))))) + (sleep-operation 10)))))) waiters) (loop resources -- cgit v1.2.3