From 72974abb585bee357f650eeab5b0d2ba319423a9 Mon Sep 17 00:00:00 2001
From: Matthew Wilson <matt@plainblack.com>
Date: Mon, 17 Apr 2006 08:02:52 +0000
Subject: [PATCH] here ya go

---
 lib/WebGUI/Asset/Wobject/EventManagementSystem.pm | 10 +++++++++-
 1 file changed, 9 insertions(+), 1 deletion(-)

diff --git a/lib/WebGUI/Asset/Wobject/EventManagementSystem.pm b/lib/WebGUI/Asset/Wobject/EventManagementSystem.pm
index 321d66d6a..175e3bcbe 100644
--- a/lib/WebGUI/Asset/Wobject/EventManagementSystem.pm
+++ b/lib/WebGUI/Asset/Wobject/EventManagementSystem.pm
@@ -1115,7 +1115,15 @@ sub verifyAllPrerequisites {
 	return [] unless $lastResultsSize;
 	until ($currentResultsSize == $lastResultsSize) {
 		$currentResultsSize = $lastResultsSize;
-		$lastResults = {%$lastResults,%{$self->verifyEventPrerequisites($lastResults)}};
+		my $newMsgLoop = [];
+		($lastResults,$newMsgLoop) = {%$lastResults,%{$self->verifyEventPrerequisites($lastResults,1)}};
+		foreach my $newMsg (@$newMsgLoop) {
+			my $add = 1;
+			foreach my $oldMsg (@$msgLoop) {
+				$add = 0 if $oldMsg->{productId} eq $newMsg->{productId};
+			}
+			push (@$msgLoop,$newMsg) if $update;
+		}
 		$lastResultsSize = scalar(keys %$lastResults);
 	}