- fix [ 1344146 ] deleting recurring events doesn't work

This commit is contained in:
Matthew Wilson 2005-12-12 04:56:37 +00:00
parent ea85a42fca
commit f413489b49
2 changed files with 4 additions and 5 deletions

View file

@ -255,11 +255,9 @@ sub www_deleteEventConfirm {
my $self = shift;
return WebGUI::Privilege::insufficient() unless ($self->canEdit);
if (($session{form}{rid} ne "") and ($session{form}{rid} ne "0")) {
my $where = "EventsCalendar_event.EventsCalendar_recurringId=".quote($session{form}{rid});
my $series = $self->getParent->getLineage(["descendants"],{returnObjects=>1,
joinClass=>"WebGUI::Asset::Event",whereClause=>$where});
foreach my $trashedEvent (@{$series}) {
$trashedEvent->trash;
my $series = $self->getParent->getLineage(["descendants"],{returnObjects=>1});
foreach my $event (@{$series}) {
$event->trash if $trashedEvent->get("EventsCalendar_recurringId") eq $session{form}{rid};
}
} else {
$self->trash;