From a7b1d5bd5d5536dfae197fb6a7e6809e67d0df29 Mon Sep 17 00:00:00 2001 From: ntruchsess <> Date: Wed, 21 May 2014 19:28:31 +0000 Subject: [PATCH] OWX_ASYNC: fix: 'Use of each() on hash after insertion... on line 1134'-error when catching exception from task git-svn-id: https://svn.fhem.de/fhem/trunk@5922 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/00_OWX_ASYNC.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/fhem/FHEM/00_OWX_ASYNC.pm b/fhem/FHEM/00_OWX_ASYNC.pm index e945c8d39..a75d7859d 100644 --- a/fhem/FHEM/00_OWX_ASYNC.pm +++ b/fhem/FHEM/00_OWX_ASYNC.pm @@ -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;