2
0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-02-08 05:15:10 +00:00

57_CALVIEW.pm: -changed the way to get uids from calendar

git-svn-id: https://svn.fhem.de/fhem/trunk@10929 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
chris1284 2016-02-24 17:51:42 +00:00
parent 51d4dd068a
commit c5c44d64b0

View File

@ -204,21 +204,21 @@ sub getsummery($)
my @modes = split(/,/,$modi); my @modes = split(/,/,$modi);
foreach my $calendername (@calendernamen){ foreach my $calendername (@calendernamen){
#foreach my $mode (@modes){ #foreach my $mode (@modes){
my $all = CallFn($calendername, "GetFn", $defs{$calendername},(" ","full", "next")); my $all = CallFn($calendername, "GetFn", $defs{$calendername},(" ","uid", "next"));
my @termine=split(/\n/,$all); my @termine=split(/\n/,$all);
foreach my $termin (@termine){ foreach my $uid (@termine){
my @uid=split(/\s+/,$termin); #my @uid=split(/\s+/,$termin);
#für jedes event die einzelnen infos holen #für jedes event die einzelnen infos holen
my $tmpstarts = CallFn($calendername, "GetFn", $defs{$calendername},(" ","start", $uid[0])); my $tmpstarts = CallFn($calendername, "GetFn", $defs{$calendername},(" ","start", $uid));
my @starts = split(/\n/,$tmpstarts); my @starts = split(/\n/,$tmpstarts);
#my $tmptexts = CallFn($calendername, "GetFn", $defs{$calendername},(" ","text", $uid[0])); #my $tmptexts = CallFn($calendername, "GetFn", $defs{$calendername},(" ","text", $uid[0]));
#my @texts = split(/\n/,$tmptexts); #my @texts = split(/\n/,$tmptexts);
my $tmpends = CallFn($calendername, "GetFn", $defs{$calendername},(" ","end", $uid[0])); my $tmpends = CallFn($calendername, "GetFn", $defs{$calendername},(" ","end", $uid));
my @ends = split(/\n/,$tmpends); my @ends = split(/\n/,$tmpends);
my $tmpsummarys = CallFn($calendername, "GetFn", $defs{$calendername},(" ","summary", $uid[0])); my $tmpsummarys = CallFn($calendername, "GetFn", $defs{$calendername},(" ","summary", $uid));
my @summarys = split(/\n/,$tmpsummarys); my @summarys = split(/\n/,$tmpsummarys);
my $tmplocations = CallFn($calendername, "GetFn", $defs{$calendername},(" ","location", $uid[0])); my $tmplocations = CallFn($calendername, "GetFn", $defs{$calendername},(" ","location", $uid));
my @locations = split(/\n/,$tmplocations); my @locations = split(/\n/,$tmplocations);
for(my $i = 1; $i <= (scalar(@starts)); $i++) { for(my $i = 1; $i <= (scalar(@starts)); $i++) {