From 03175dcbcbe081800aba0203b545778d0ed598bc Mon Sep 17 00:00:00 2001
From: JT Smith <jt@plainblack.com>
Date: Sat, 28 Sep 2002 03:51:34 +0000
Subject: [PATCH] Fixed a bug where the message log could try to add duplicate
 entries for the same user.

---
 lib/WebGUI/MessageLog.pm | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/lib/WebGUI/MessageLog.pm b/lib/WebGUI/MessageLog.pm
index 22a277ff7..4a65f1d7e 100644
--- a/lib/WebGUI/MessageLog.pm
+++ b/lib/WebGUI/MessageLog.pm
@@ -19,6 +19,7 @@ use WebGUI::Session;
 use WebGUI::SQL;
 use WebGUI::URL;
 use WebGUI::User;
+use WebGUI::Utility;
 
 #-------------------------------------------------------------------
 sub _notify {
@@ -54,7 +55,7 @@ sub addEntry {
 	if ($groupId ne "") {
 		@users = WebGUI::SQL->buildArray("select userId from groupings where groupId=$groupId");
 	}
-	@users = ($userId,@users) if ($userId ne "");
+	@users = ($userId,@users) if ($userId ne "" && !isIn($userId, @users));
 	foreach $user (@users) {
 		$u = WebGUI::User->new($user);
 		if ($u->userId ne "") {
@@ -83,7 +84,7 @@ sub addInternationalizedEntry {
         if ($groupId ne "") {
                 @users = WebGUI::SQL->buildArray("select userId from groupings where groupId=$groupId");
         }
-	@users = ($userId,@users) if ($userId ne "");
+	@users = ($userId,@users) if ($userId ne "" && !isIn($userId, @users));
         foreach $user (@users) {
                 $u = WebGUI::User->new($user);
                 if ($u->userId ne "") {