Wrap the logic into a single expression

Signed-off-by: Hanxi Zhang <hanxizh@amazon.com>

Author: hanxizh9910

tests/unit/cluster/cli.tcl

@@ -296,17 +296,13 @@ test {Migrate the last slot away from a node using valkey-cli} {
         set owner_id [$owner_r CLUSTER MYID]
 
         # Wait until owner node knows the new node
-        wait_for_condition 1000 50 [list {
-            set nodes [get_cluster_nodes $owner_id]
+        wait_for_condition 1000 50 {
             set found 0
-            foreach n $nodes {
-                if {[dict get $n id] eq $newnode_id} {
-                    set found 1
-                    break
-                }
+            foreach n [get_cluster_nodes $owner_id] {
+                if {[dict get $n id] eq $newnode_id} { set found 1; break }
             }
             $found
-        }] else {
+        } else {
             fail "Owner node does not know the new node yet"
         }
 

tests/unit/cluster/test-flaky-migrate-slots.tcl

@@ -50,17 +50,13 @@ test {Migrate the last slot away from a node using valkey-cli} {
         set owner_id [$owner_r CLUSTER MYID]
 
         # Wait until owner node knows the new node
-        wait_for_condition 1000 50 [list {
-            set nodes [get_cluster_nodes $owner_id]
+        wait_for_condition 1000 50 {
             set found 0
-            foreach n $nodes {
-                if {[dict get $n id] eq $newnode_id} {
-                    set found 1
-                    break
-                }
+            foreach n [get_cluster_nodes $owner_id] {
+                if {[dict get $n id] eq $newnode_id} { set found 1; break }
             }
             $found
-        }] else {
+        } else {
             fail "Owner node does not know the new node yet"
         }
 
@@ -114,4 +110,4 @@ test {Migrate the last slot away from a node using valkey-cli} {
         wait_for_cluster_propagation
         assert_match *master* [$owner_r role]
     }
-}
+}