OWX_ASYNC: fix: 'Use of each() on hash after insertion... on line 1134'-error when catching exception from task

git-svn-id: svn://svn.code.sf.net/p/fhem/code/trunk@5922 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
ntruchsess
2014-05-21 19:28:31 +00:00
parent 00688104ff
commit 82b98b31fc

View File

@@ -1130,7 +1130,8 @@ sub OWX_ASYNC_RunTasks($) {
my ( $master ) = @_;
my ( $owx_dev, $queue );
if ($master->{STATE} eq "Active") {
while ( ( $owx_dev, $queue ) = each %{$master->{tasks}} ) {
foreach my $owx_dev (keys %{$master->{tasks}}) {
my $queue = $master->{tasks}->{$owx_dev};
if (@$queue) {
my $task = $queue->[0];
my $ret;