73_km200.pm: Bugfix

git-svn-id: https://svn.fhem.de/fhem/trunk@10707 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
sailor-fhem
2016-02-03 12:29:46 +00:00
parent 7c37f3281d
commit 21495da027

View File

@@ -471,6 +471,9 @@ sub km200_Attr(@)
my @KM200_DONOTPOLL = ();
my @temp = @a;
### Stop the current timer
RemoveInternalTimer($hash);
### Delete the first 3 items of the array
splice @temp, 0, 3;
@@ -511,9 +514,6 @@ sub km200_Attr(@)
### Message for debugging purposes
Log3 $name, 5, $name. " : km200 - The following services will not be polled: ". $a[3];
### Stop the current timer
RemoveInternalTimer($hash);
### Interrupting all currently running Polling
@{$hash->{Secret}{KM200DYNSERVICES}} = "";
@@ -522,8 +522,8 @@ sub km200_Attr(@)
### Delete all Readings
fhem( "deletereading $name .*" );
### Re-start the sounding of values from KM200 but wait the period of $hash->{POLLINGTIMEOUT} + 1s
InternalTimer(gettimeofday()+$hash->{POLLINGTIMEOUT}+1, "km200_GetInitService", $hash, 0);
### Re-start the sounding of values from KM200 but wait the period of $hash->{POLLINGTIMEOUT} + 10s
InternalTimer(gettimeofday()+$hash->{POLLINGTIMEOUT}+10, "km200_GetInitService", $hash, 0);
Log3 $name, 5, $name. " : km200 - Sounding of services re-started after change of DoNotPoll attribute";
}
### Check whether time-out for Read-Back has been provided