fix a bug with duplicating calendars that interfered with deploying packages

This commit is contained in:
Colin Kuskie 2007-03-13 16:37:17 +00:00
parent 2223ce8749
commit b97caae3c8
2 changed files with 3 additions and 2 deletions

View file

@ -44,6 +44,7 @@
- fix: RollbackVersion (Thanks to Erik Svanberg for the patch)
- rfe: Paginate "manageCommittedVersions" (perlDreamer Consulting, LLC)
- rfe: manageCommittedVersions in reverse chronological order (perlDreamer Consulting, LLC)
- fix: Deploy package with calendar
7.3.11
- Added an option for enabling coverage tests to testCodebase.pl.

View file

@ -371,12 +371,12 @@ sub duplicate {
my $newCalendar = $self->SUPER::duplicate(@_);
# Duplicate the events in this calendar
my @events = $self->getLineage(["descendents"], {
my $events = $self->getLineage(["descendents"], {
returnObjects => 1,
includeOnlyClasses => ['WebGUI::Asset::Event'],
});
for my $event (@events) {
for my $event (@{ $events }) {
my %eventProperties = %{ $event->get() };
$newCalendar->addChild(\%eventProperties);
}