From a0e4b48c942c4100eab0f2828e1464861589224a Mon Sep 17 00:00:00 2001 From: Matthew Wilson Date: Thu, 27 Apr 2006 03:02:43 +0000 Subject: [PATCH] should speed things up.. --- lib/WebGUI/Asset/Wobject/EventManagementSystem.pm | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) diff --git a/lib/WebGUI/Asset/Wobject/EventManagementSystem.pm b/lib/WebGUI/Asset/Wobject/EventManagementSystem.pm index 731b0ac05..5c65e2840 100644 --- a/lib/WebGUI/Asset/Wobject/EventManagementSystem.pm +++ b/lib/WebGUI/Asset/Wobject/EventManagementSystem.pm @@ -1159,10 +1159,12 @@ sub verifyAllPrerequisites { my $self = shift; my $returnArrayFlag = shift; my $cache; + my $pId; if ($returnArrayFlag) { - $cache = WebGUI::Cache->new($self->session,["verifyAllPrerequisites",$returnArrayFlag]); + $pId = $self->getEventDetails($returnArrayFlag)->{prerequisiteId}; + $cache = WebGUI::Cache->new($self->session,["verifyAllPrerequisites",$pId]); my $eventData = $cache->get; - return $eventData->{$returnArrayFlag} if defined $eventData->{$returnArrayFlag}; + return $eventData->{$pId} if defined $eventData->{$pId}; } #use Data::Dumper; #start with the events in the scratch cart. See if all prerequisites are met @@ -1194,7 +1196,7 @@ sub verifyAllPrerequisites { my $rowsLoop = []; if ($returnArrayFlag) { my @silliness = keys %$lastResults; - $cache->set({$returnArrayFlag=>\@silliness}, 60*60*24*360); + $cache->set({$pId=>\@silliness}, 60*60*24*360); return \@silliness; } foreach (keys %$lastResults) {