diff --git a/fhem/CHANGED b/fhem/CHANGED index 4dc5633d5..54829362a 100644 --- a/fhem/CHANGED +++ b/fhem/CHANGED @@ -1,7 +1,9 @@ # Add changes at the top of the list. Keep it in ASCII, and 80-char wide. # Do not insert empty lines here, update check depends on it. + - feature: 98_weekprofile: Force to send complete week profile + Attr forceCompleteProfile - feature: 98_weekprofile: delay between sending profile data to the - same type of device. Attr send_delay + same type of device. Attr sendDelay - bugfix: 88_HMCCU: Bug fixes - change: 10_MYSENSORS_DEVICE: make OTA feature available, change battery name convention, diff --git a/fhem/FHEM/98_weekprofile.pm b/fhem/FHEM/98_weekprofile.pm index 9d5b035f8..33095d6e6 100644 --- a/fhem/FHEM/98_weekprofile.pm +++ b/fhem/FHEM/98_weekprofile.pm @@ -305,7 +305,7 @@ sub weekprofile_sendDevProfile(@) my $devPrf = weekprofile_readDevProfile($device,$type,$me); - + my $force = AttrVal($me,"forceCompleteProfile",0); # only send changed days my @dayToTransfer = (); @@ -327,7 +327,7 @@ sub weekprofile_sendDevProfile(@) } } - if ($equal == 0) { + if ($equal == 0 || $force > 0) { push @dayToTransfer , $day; next; } @@ -407,7 +407,7 @@ sub weekprofile_sendDevProfile(@) $cmd =~ s/^\s+|\s+$//g; #transfer profil data delayed e.q. to avoid messages like "queue is full, dropping packet" by HM devices - my $snd_delay = AttrVal($me,"send_delay",0); + my $snd_delay = AttrVal($me,"sendDelay",0); if ($snd_delay>0) { my $datetimenow = gettimeofday(); @@ -568,7 +568,7 @@ sub weekprofile_Initialize($) $hash->{NotifyFn} = "weekprofile_Notify"; $hash->{AttrFn} = "weekprofile_Attr"; $hash->{AttrList} = "useTopics:0,1 widgetTranslations widgetWeekdays widgetEditOnNewPage:0,1 widgetEditDaysInRow:1,2,3,4,5,6,7 \ - send_delay tempON tempOFF configFile ".$readingFnAttributes; + sendDelay tempON tempOFF configFile forceCompleteProfile:0,1 ".$readingFnAttributes; $hash->{FW_summaryFn} = "weekprofile_SummaryFn"; @@ -1536,10 +1536,16 @@ sub weekprofile_getEditLNK_MasterDev($$)