Index: openacs-4/packages/simulation/lib/messages.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/lib/messages.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/simulation/lib/messages.tcl	16 Dec 2003 14:16:28 -0000	1.2
+++ openacs-4/packages/simulation/lib/messages.tcl	19 Dec 2003 14:52:21 -0000	1.3
@@ -40,7 +40,7 @@
 
 # TODO: make case_name be a combo of simulation name and case #
 db_multirow -extend { message_url } messages select_messages "
-    select sm.message_id,
+    select distinct sm.message_id,
            sm.title as subject,
            sm.case_id as case_name,
            creation_date as date,
@@ -59,4 +59,4 @@
        and wcrmp.case_id = sm.case_id
 " {
     set message_url [export_vars -base "[apm_package_url_from_id $package_id]simplay/message" { message_id }]
-}
\ No newline at end of file
+}