diff --git a/knots/resource-pool.scm b/knots/resource-pool.scm
index 2d96ed7..f957c3d 100644
--- a/knots/resource-pool.scm
+++ b/knots/resource-pool.scm
@@ -1117,13 +1117,14 @@
         (lambda ()
           (let loop ()
             (put-message channel '(check-for-idle-resources))
-            (when (choice-operation
-                   (wrap-operation
-                    (sleep-operation idle-seconds)
-                    (const #t))
-                   (wrap-operation
-                    (wait-operation destroy-condition)
-                    (const #f)))
+            (when (perform-operation
+                   (choice-operation
+                    (wrap-operation
+                     (sleep-operation idle-seconds)
+                     (const #t))
+                    (wrap-operation
+                     (wait-operation destroy-condition)
+                     (const #f))))
               (loop))))))
 
      (with-exception-handler