merging 6.7.8 bug fixes

This commit is contained in:
JT Smith 2005-11-29 01:28:28 +00:00
parent 89f8729ba5
commit 9749fd7005
7 changed files with 152 additions and 10 deletions

View file

@ -353,6 +353,7 @@ sub view {
isStartOfWeek=>($dayOfWeekCounter==1),
isEndOfWeek=>($dayOfWeekCounter==7),
isToday=>($date[0]."-".$date[1]."-".$dayCounter eq $now[0]."-".$now[1]."-".$now[2]),
hasEvents=>(exists $events{$dayCounter}),
event_loop=>\@{$events{$dayCounter}},
url=>$events{$dayCounter}->[0]->{url}
});