fix watchdog check - check all nodes after time progress

diff --git a/PVE/HA/Sim/Hardware.pm b/PVE/HA/Sim/Hardware.pm
index a9af5c983c3383ec0807b16168a7d1e26b7e8fdd..f2d01f24a5dbd2064eaa1bce53b59b2c1e79a516 100644 (file)
--- a/PVE/HA/Sim/Hardware.pm
+++ b/PVE/HA/Sim/Hardware.pm
@@ -262,7 +262,9 @@ sub run {
 
        my $starttime = $self->get_time();
 
-       foreach my $node (sort keys %{$self->{nodes}}) {
+       my @nodes = sort keys %{$self->{nodes}};
+
+       foreach my $node (@nodes) {
            my $haenv = $self->{nodes}->{$node}->{haenv};
            my $server = $self->{nodes}->{$node}->{server};
 
@@ -276,10 +278,11 @@ sub run {
 
            my $nodetime = $haenv->get_time();
            $self->{cur_time} = $nodetime if $nodetime > $self->{cur_time};
-
-           if (!$self->watchdog_check($node)) {
-
-               die "node '$node' fenced - implement me";
+           
+           foreach my $n (@nodes) {
+               if (!$self->watchdog_check($n)) {
+                   die "node '$n' fenced - implement me";
+               }
            }
        }