Index: openacs-4/packages/simulation/lib/messages.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/lib/messages.tcl,v
diff -u -r1.15 -r1.16
--- openacs-4/packages/simulation/lib/messages.tcl	11 Mar 2004 15:15:05 -0000	1.15
+++ openacs-4/packages/simulation/lib/messages.tcl	12 Mar 2004 15:34:55 -0000	1.16
@@ -115,6 +115,7 @@
            workflow_cases wc,
            sim_cases sc
     where  cr.revision_id = sm.message_id
+    and    sm.entry_id is null
     and    wc.case_id = sm.case_id
     [ad_decode $role_id "" "" "and    (sm.to_role_id = :role_id or sm.from_role_id = :role_id)"]
     and    wc.case_id = sm.case_id