From 068f70fe8132b1759fde61e6c7a235d583897c56 Mon Sep 17 00:00:00 2001 From: rudolfkoenig Date: Sat, 12 May 2012 07:57:49 +0000 Subject: [PATCH] added get commands yesterday/tommorrow git-svn-id: https://fhem.svn.sourceforge.net/svnroot/fhem/trunk/fhem@1555 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- FHEM/95_holiday.pm | 19 +++++++++++++++++-- docs/commandref.html | 5 ++++- 2 files changed, 21 insertions(+), 3 deletions(-) diff --git a/FHEM/95_holiday.pm b/FHEM/95_holiday.pm index 73c57a992..20b08fbb1 100755 --- a/FHEM/95_holiday.pm +++ b/FHEM/95_holiday.pm @@ -197,8 +197,23 @@ holiday_Get($@) my ($hash, @a) = @_; return "argument is missing" if(int(@a) != 2); - return "wrong argument: need MM-DD" if($a[1] !~ m/^[01]\d-[0-3]\d$/); - return holiday_refresh($hash->{NAME}, $a[1]); + my $arg; + + if($a[1] =~ m/^[01]\d-[0-3]\d/) { + $arg = $a[1]; + + } elsif($a[1] =~ m/^yesterday|today|tomorrow$/) { + my $t = time(); + $t += 86400 if($a[1] eq "tomorrow"); + $t -= 86400 if($a[1] eq "yesterday"); + my @a = localtime($t); + $arg = sprintf("%02d-%02d", $a[4]+1, $a[3]); + + } else { + return "wrong argument: need MM-DD/yesterday/today/tomorrow" + + } + return holiday_refresh($hash->{NAME}, $arg); } sub diff --git a/docs/commandref.html b/docs/commandref.html index 13f83777c..d1fde7f9c 100644 --- a/docs/commandref.html +++ b/docs/commandref.html @@ -8838,7 +8838,10 @@ KlikAanKlikUit, NEXA, CHACON, HomeEasy UK.
You need to define an RFXtrx433 Get