Index: openacs-4/packages/simulation/tcl/template-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/tcl/template-procs.tcl,v
diff -u -r1.49 -r1.50
--- openacs-4/packages/simulation/tcl/template-procs.tcl	14 Jan 2004 15:11:26 -0000	1.49
+++ openacs-4/packages/simulation/tcl/template-procs.tcl	15 Jan 2004 16:09:51 -0000	1.50
@@ -655,7 +655,7 @@
     }
 
     # Notify users enrolled in the simulation
-    db_foreach select_enrolled_users {
+    set enrolled_users [db_list_of_lists select_enrolled_users {
             select distinct cu.user_id,
                    cu.email,
                    cu.first_names || ' ' || cu.last_name as user_name
@@ -664,7 +664,13 @@
             where spsm.simulation_id = :workflow_id
              and spsm.type = 'enrolled'
              and spsm.party_id = cu.user_id
-    } {
+    }]
+
+    foreach user_item $enrolled_users {
+        set user_id [lindex $user_item 0]
+        set email [lindex $user_item 1]
+        set user_name [lindex $user_item 2]        
+        
         # TODO: check that link to enrollment page is correct
         set package_id [ad_conn package_id]
         set simplay_url \