From: Robert 'phaylon' Sedlacek Date: Fri, 27 Jul 2012 21:12:58 +0000 (+0000) Subject: fixed result iteration X-Git-Tag: v0.001_001~16 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=bd4f6141ea31fa9af9f152f90c40292ac45e2b36;p=scpubgit%2FSystem-Introspector.git fixed result iteration --- diff --git a/lib/System/Introspector/State.pm b/lib/System/Introspector/State.pm index e2b15f1..876ab3d 100644 --- a/lib/System/Introspector/State.pm +++ b/lib/System/Introspector/State.pm @@ -27,7 +27,7 @@ sub gather { } $self->_log("Now waiting for results"); for my $wait (@waiting) { - my ($host, @futures) = @$_; + my ($host, @futures) = @$wait; my @data = await_all @futures; $self->_log("Received all from group '$group' on '$host'"); $self->_store($host, $group, +{ map %$_, @data });