mirror of
https://github.com/fhem/fhem-mirror.git
synced 2025-04-21 07:56:03 +00:00
95_holiday.pm: add YYYY-MM-DD (Forum #93277)
git-svn-id: https://svn.fhem.de/fhem/trunk@21877 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
parent
e383efc3c1
commit
e4ae1bd0a2
@ -47,6 +47,7 @@ holiday_refresh($;$$)
|
||||
my ($name, $fordate, $showAvailable) = (@_);
|
||||
my $hash = $defs{$name};
|
||||
my $fromTimer=0;
|
||||
my $foryeardate;
|
||||
|
||||
return if(!$hash); # Just deleted
|
||||
|
||||
@ -56,12 +57,14 @@ holiday_refresh($;$$)
|
||||
if(!$fordate) {
|
||||
$fromTimer = 1;
|
||||
$fordate = sprintf("%02d-%02d", $lt[4]+1, $lt[3]);
|
||||
$foryeardate = sprintf("%4d-%02d-%02d",$lt[5]+1900, $lt[4]+1, $lt[3]);
|
||||
@fd = @lt;
|
||||
} else {
|
||||
$fordate =~ m/^((\d{4})-)?([01]\d)-([0-3]\d)$/; # fmt is already checked
|
||||
my ($m,$d) = ($3,$4);
|
||||
my ($y,$m,$d) = ($2, $3,$4);
|
||||
$fordate = "$m-$d";
|
||||
$lt[5] = $2-1900 if($2);
|
||||
$foryeardate = $a ? "$y-$m-$d" : sprintf("%4d-%02d-%02d",$lt[5]+1900,$m,$d);
|
||||
@fd = localtime(mktime(1,1,1,$d,$m-1,$lt[5],0,0,-1));
|
||||
}
|
||||
|
||||
@ -105,9 +108,9 @@ holiday_refresh($;$$)
|
||||
next if($l =~ m/^\s*$/);
|
||||
my $found;
|
||||
|
||||
if($l =~ m/^1/) { # Exact date: 1 MM-DD Holiday
|
||||
if($l =~ m/^1/) { # Exact date: 1 MM-DD Holiday (MM-DD-YYYY, Forum #93277)
|
||||
my @args = split(" ", $l, 3);
|
||||
if($args[1] eq $fordate) {
|
||||
if(@args == 3 && ($args[1] eq $fordate || $args[1] eq $foryeardate)) {
|
||||
$found = $args[2];
|
||||
}
|
||||
|
||||
@ -287,7 +290,7 @@ holiday_Get($@)
|
||||
{
|
||||
my ($hash, @a) = @_;
|
||||
|
||||
shift(@a) if($a[1] && $a[1] eq "MM-DD" || $a[1] eq "YYYY-MM-DD");
|
||||
shift(@a) if($a[1] && ($a[1] eq "MM-DD" || $a[1] eq "YYYY-MM-DD"));
|
||||
return "argument is missing" if(int(@a) < 2);
|
||||
my $arg;
|
||||
|
||||
@ -405,7 +408,8 @@ holiday_FW_detailFn($$$$)
|
||||
<ul>
|
||||
<li>1<br>
|
||||
Exact date. Arguments: <MM-DD> <holiday-name><br>
|
||||
Exampe: 1 12-24 Christmas
|
||||
Exampe: 1 12-24 Christmas<br>
|
||||
You can alternatively specify the year as YYYY-MM-DD.
|
||||
</li>
|
||||
<li>2<br>
|
||||
Easter-dependent date. Arguments: <day-offset>
|
||||
@ -559,7 +563,8 @@ holiday_FW_detailFn($$$$)
|
||||
<ul>
|
||||
<li>1<br>
|
||||
Genaues Datum. Argument: <MM-TT> <Feiertag-Name><br>
|
||||
Beispiel: 1 12-24 Weihnachten
|
||||
Beispiel: 1 12-24 Weihnachten<br>
|
||||
Statt MM-TT kann auch YYYY-MM-TT geschrieben werden
|
||||
</li>
|
||||
<li>2<br>
|
||||
Oster-abhängiges Datum. Argument: <Tag-Offset>
|
||||
|
Loading…
x
Reference in New Issue
Block a user