corresponding cacher changes

This commit is contained in:
Matthew Wilson 2006-04-27 13:31:51 +00:00
parent 3bf0fbab41
commit 6c8e649879

View file

@ -78,9 +78,9 @@ sub execute {
my $start = time(); my $start = time();
my $leftOff = $instance->getScratch("emsleftoff"); my $leftOff = $instance->getScratch("emsleftoff");
my $skip = ($leftOff ne "") ? 1 : 0; my $skip = ($leftOff ne "") ? 1 : 0;
WebGUI::Cache->new($self->session)->deleteChunk(["verifyAllPrerequisites"]) unless ($skip); WebGUI::Cache->new($self->session)->deleteChunk(["gAPRE"]) unless ($skip);
my $status = $self->COMPLETE; my $status = $self->COMPLETE;
my @events = $self->session->db->buildArray("select productId from EventManagementSystem_products"); my @events = $self->session->db->buildArray("select distinct(prerequisiteId) from EventManagementSystem_products");
foreach my $event (@events) { foreach my $event (@events) {
$skip = 0 if ($leftOff eq $event); $skip = 0 if ($leftOff eq $event);
next if $skip; next if $skip;
@ -89,7 +89,7 @@ sub execute {
$status = $self->WAITING; $status = $self->WAITING;
last; last;
} }
$ems->verifyAllPrerequisites($event); $ems->getAllPossibleRequiredEvents($event) if $event;
} }
$self->session->errorHandler->warn('EMS Cacher Ran! Status: '.$status); $self->session->errorHandler->warn('EMS Cacher Ran! Status: '.$status);
return $status; return $status;