bugfix for duration (sub d)
git-svn-id: https://svn.fhem.de/fhem/trunk@3042 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
@@ -290,8 +290,7 @@ sub d {
|
|||||||
|
|
||||||
my @c= split("P", $d);
|
my @c= split("P", $d);
|
||||||
$sign= -1 if($c[0] eq "-");
|
$sign= -1 if($c[0] eq "-");
|
||||||
shift @c if($c[0] =~ m/[\+\-]/);
|
my ($dw,$dt)= split("T", $c[1]);
|
||||||
my ($dw,$dt)= split("T", $c[0]);
|
|
||||||
$dt="" unless defined($dt);
|
$dt="" unless defined($dt);
|
||||||
if($dw =~ m/(\d+)D$/) {
|
if($dw =~ m/(\d+)D$/) {
|
||||||
$t+= 86400*$1; # days
|
$t+= 86400*$1; # days
|
||||||
|
|||||||
Reference in New Issue
Block a user