diff --git a/fhem/FHEM/57_CALVIEW.pm b/fhem/FHEM/57_CALVIEW.pm
index 0886e44df..1f5d8d533 100644
--- a/fhem/FHEM/57_CALVIEW.pm
+++ b/fhem/FHEM/57_CALVIEW.pm
@@ -32,6 +32,7 @@ sub CALVIEW_Initialize($)
"sourcecolor:textField-long " .
"timeshort:1,0 " .
"yobfield:_location,_description,_summary " .
+ "weekdayformat:de-long,de-short,en-long,en-short " .
$readingFnAttributes;
}
sub CALVIEW_Define($$){
@@ -109,7 +110,10 @@ sub CALVIEW_GetUpdate($){
my $isoendtime;
my ($D,$M,$Y);
my ($eD,$eM,$eY);
- my @arrWeekday = ("Sonntag","Montag", "Dienstag","Mittwoch","Donnerstag","Freitag","Samstag");
+ my @arrWeekdayDe = ("Sonntag","Montag", "Dienstag","Mittwoch","Donnerstag","Freitag","Samstag");
+ my @arrWeekdayDeShrt = ("So","Mo", "Di","Mi","Do","Fr","Sa");
+ my @arrWeekdayEn = ("Sunday","Monday", "Tuesday","Wednesday","Thursday","Friday","Saturday");
+ my @arrWeekdayEnShrt = ("Sun","Mon", "Tue","Wed","Thu","Fri","Sat");
foreach my $item (@termine ){
#start datum und zeit behandeln
if( defined($item->[0])&& length($item->[0]) > 0) {
@@ -136,6 +140,13 @@ sub CALVIEW_GetUpdate($){
my $daysleft_long;
#my $weekday = Day_of_Week($Y, $M, $D);
my ($tsec,$tmin,$thour,$tmday,$tmon,$year,$weekday,$tyday,$tisdst) = localtime(time + (86400 * $daysleft));
+ #"weekdayname:de-long,de-short,en-long,en-short " .
+ my $weekdayname;
+ if ( AttrVal($name,"weekdayformat","de-long") eq "de-short") {$weekdayname = $arrWeekdayDeShrt[$weekday]}
+ elsif (AttrVal($name,"weekdayformat","de-long") eq "en-long") {$weekdayname = $arrWeekdayEn[$weekday]}
+ elsif (AttrVal($name,"weekdayformat","de-long") eq "en-short") {$weekdayname = $arrWeekdayEnShrt[$weekday]}
+ else {$weekdayname = $arrWeekdayDe[$weekday]}
+
if( $daysleft == 0){$daysleft_long = "heute";}
elsif( $daysleft == 1){$daysleft_long = "morgen";}
else{$daysleft_long = "in ".$daysleft." Tagen";}
@@ -155,7 +166,7 @@ sub CALVIEW_GetUpdate($){
btimestamp => $bts[0],
mode => $item->[6],
weekday => $weekday,
- weekdayname => $arrWeekday[$weekday]};
+ weekdayname => $weekdayname};
}
my $todaycounter = 1;
my $tomorrowcounter = 1;
@@ -431,6 +442,13 @@ sub CALVIEW_Notify($$)
_location - year of birth will be read from term location
_summary - year of birth will be read from summary (uses the first sequence of 4 digits in the string)
+