diff --git a/fhem/FHEM/00_FBAHAHTTP.pm b/fhem/FHEM/00_FBAHAHTTP.pm index 93fc81f7f..51a556414 100644 --- a/fhem/FHEM/00_FBAHAHTTP.pm +++ b/fhem/FHEM/00_FBAHAHTTP.pm @@ -17,7 +17,7 @@ FBAHAHTTP_Initialize($) $hash->{DefFn} = "FBAHAHTTP_Define"; $hash->{SetFn} = "FBAHAHTTP_Set"; $hash->{AttrFn} = "FBAHAHTTP_Attr"; - $hash->{AttrList} = "dummy:1,0 fritzbox-user polltime"; + $hash->{AttrList} = "dummy:1,0 fritzbox-user polltime async_delay"; } @@ -176,7 +176,12 @@ FBAHAHTTP_ProcessStack($) chomp $_[2]; Log3 $name, 5, "FBAHAHTTP_Write reply for $name: $_[2]"; pop @{$hash->{CmdStack}}; - FBAHAHTTP_ProcessStack($hash) if(@{$hash->{CmdStack}} > 0); + if(@{$hash->{CmdStack}} > 0) { + my $ad = AttrVal($name, "async_delay", 0.2); + InternalTimer(gettimeofday()+$ad, sub(){ + FBAHAHTTP_ProcessStack($hash); + }, $hash); + } } }); } @@ -255,9 +260,17 @@ FBAHAHTTP_Write($$$)