set default group to edit events to be the same as group allowed to edit calendar

This commit is contained in:
Colin Kuskie 2007-03-01 22:03:06 +00:00
parent f800a0d8b0
commit 89686f3fd9
2 changed files with 5 additions and 3 deletions

View file

@ -1,6 +1,7 @@
7.3.12 7.3.12
- fix: Fixing bad link on the Event page to the search engine. Added a new - fix: Fixing bad link on the Event page to the search engine. Added a new
Event template variable called urlSearch to handle it. (perlDreamer Consulting, LLC) Event template variable called urlSearch to handle it. (perlDreamer Consulting, LLC)
- fix: Set default groupIdEditEvent to groupIdEdit during upgrade (perlDreamer Consulting, LLC)
7.3.11 7.3.11
- Added an option for enabling coverage tests to testCodebase.pl. - Added an option for enabling coverage tests to testCodebase.pl.

View file

@ -219,7 +219,7 @@ sub migrateCalendars {
includeOnlyClasses => ['WebGUI::Asset::Wobject::EventsCalendar'], includeOnlyClasses => ['WebGUI::Asset::Wobject::EventsCalendar'],
returnObjects => 1, returnObjects => 1,
}); });
for my $asset (@{$calendars}) for my $asset (@{$calendars})
{ {
next unless defined $asset; next unless defined $asset;
@ -232,9 +232,10 @@ sub migrateCalendars {
my $properties = {%{$asset->get}}; my $properties = {%{$asset->get}};
$properties->{defaultDate} = delete $properties->{defaultMonth};
#warn "Found calendar ".$properties->{title}; #warn "Found calendar ".$properties->{title};
$properties->{className} = "WebGUI::Asset::Wobject::Calendar"; $properties->{defaultDate} = delete $properties->{defaultMonth};
$properties->{className} = "WebGUI::Asset::Wobject::Calendar";
$properties->{groupIdEventEdit} = $properties->{groupIdEdit};
# Add the new asset # Add the new asset
my $newAsset = $asset->getParent->addChild($properties); my $newAsset = $asset->getParent->addChild($properties);