From 7e1854cb78854154bff30605b265298f8f0d48d7 Mon Sep 17 00:00:00 2001 From: chris1284 <> Date: Wed, 13 Sep 2017 20:05:11 +0000 Subject: [PATCH] 57_CALVIEW.pm: -fixed fullday bug git-svn-id: https://svn.fhem.de/fhem/trunk@15061 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/57_CALVIEW.pm | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/fhem/FHEM/57_CALVIEW.pm b/fhem/FHEM/57_CALVIEW.pm index 71b1dea63..3e4e5bc49 100644 --- a/fhem/FHEM/57_CALVIEW.pm +++ b/fhem/FHEM/57_CALVIEW.pm @@ -197,8 +197,11 @@ sub CALVIEW_GetUpdate($){ else {$age = " "} } my $timeshort = ""; - my $nD = $D + 1; - if( $eD eq $nD && $termin->{btime} eq $termin->{etime} ){ $timeshort = AttrVal($name,"fulldaytext","ganztägig"); } + my($startday,$startmonth,$startyear)=split(/\./,$termin->{bdate}); + my($endday,$endmonth,$endyear)=split(/\./,$termin->{edate}); + my $nextday = $startday + 1; + Log3 $name , 5, "CALVIEW $name - nextday = $nextday , endday = $endday , startday = $startday , btime ".$termin->{btime}." , etime ".$termin->{etime}.""; + if( $endday eq $nextday && $termin->{btime} eq $termin->{etime} ){ $timeshort = AttrVal($name,"fulldaytext","ganztägig"); } else { if(AttrVal($name,"timeshort","0") eq 0) {$timeshort = $termin->{btime}." - ".$termin->{etime}; } elsif(AttrVal($name,"timeshort","0") eq 1) {