From 19732823f997b2004511eff5da94ef27aac81463 Mon Sep 17 00:00:00 2001
From: Matthew Wilson <matt@plainblack.com>
Date: Mon, 17 Apr 2006 08:06:53 +0000
Subject: [PATCH] fix 'er up

---
 lib/WebGUI/Asset/Wobject/EventManagementSystem.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lib/WebGUI/Asset/Wobject/EventManagementSystem.pm b/lib/WebGUI/Asset/Wobject/EventManagementSystem.pm
index 9b88b7e5e..c7fc11317 100644
--- a/lib/WebGUI/Asset/Wobject/EventManagementSystem.pm
+++ b/lib/WebGUI/Asset/Wobject/EventManagementSystem.pm
@@ -1115,8 +1115,8 @@ sub verifyAllPrerequisites {
 	return [] unless $lastResultsSize;
 	until ($currentResultsSize == $lastResultsSize) {
 		$currentResultsSize = $lastResultsSize;
-		my $newMsgLoop = [];
-		($lastResults,$newMsgLoop) = {%$lastResults,%{$self->verifyEventPrerequisites($lastResults,1)}};
+		my (%hashTemp,$newMsgLoop) = %{$self->verifyEventPrerequisites($lastResults,1)}
+		$lastResults = {%$lastResults,%hashTemp};
 		foreach my $newMsg (@$newMsgLoop) {
 			my $add = 1;
 			foreach my $oldMsg (@$msgLoop) {