mhop/fhem
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

added support for rule BYMONTH (single months only)

Browse Source 
git-svn-id: https://fhem.svn.sourceforge.net/svnroot/fhem/trunk/fhem@2311 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
borisneubert
2012-12-10 17:08:03 +00:00
parent df1757caea
commit e37a6e70aa
1 changed files with 2 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
FHEM/57_Calendar.pm
View File

@@ -367,7 +367,7 @@ sub fromVEvent {
my @rrparts= split(";", $rrule);
my %r= map { split("=", $_); } @rrparts;
my @keywords= qw(FREQ INTERVAL UNTIL COUNT BYMONTHDAY BYDAY);
my @keywords= qw(FREQ INTERVAL UNTIL COUNT BYMONTHDAY BYDAY BYMONTH);
foreach my $k (keys %r) {
if(not($k ~~ @keywords)) {
main::Log 2, "Calendar: RRULE $rrule is not supported";
@@ -381,6 +381,7 @@ sub fromVEvent {
$self->{count} = $r{"COUNT"} if(exists($r{"COUNT"}));
$self->{bymonthday} = $r{"BYMONTHDAY"} if(exists($r{"BYMONTHDAY"})); # stored but ignored
$self->{byday} = $r{"BYDAY"} if(exists($r{"BYDAY"})); # stored but ignored
$self->{bymonth} = $r{"BYMONTH"} if(exists($r{"BYMONTH"})); # stored but ignored
# advanceToNextOccurance until we are in the future
my $t = time();