diff options
Diffstat (limited to 'tests/support/util.tcl')
| -rw-r--r-- | tests/support/util.tcl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/support/util.tcl b/tests/support/util.tcl index 062f33a14..236fad314 100644 --- a/tests/support/util.tcl +++ b/tests/support/util.tcl @@ -886,9 +886,9 @@ proc wait_for_blocked_client {{idx 0}} { } } -proc wait_for_blocked_clients_count {count {maxtries 100} {delay 10}} { +proc wait_for_blocked_clients_count {count {maxtries 100} {delay 10} {idx 0}} { wait_for_condition $maxtries $delay { - [s blocked_clients] == $count + [s $idx blocked_clients] == $count } else { fail "Timeout waiting for blocked clients" } |