Index: openacs-4/packages/simulation/tcl/sim-action-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/tcl/sim-action-procs.tcl,v
diff -u -r1.13 -r1.14
--- openacs-4/packages/simulation/tcl/sim-action-procs.tcl	23 Mar 2018 23:53:02 -0000	1.13
+++ openacs-4/packages/simulation/tcl/sim-action-procs.tcl	25 Apr 2018 19:47:48 -0000	1.14
@@ -81,9 +81,9 @@
     # Parse column values
     switch $operation {
         insert - update {
-            set update_clauses [list]
-            set insert_names [list]
-            set insert_values [list]
+            set update_clauses {}
+            set insert_names {}
+            set insert_values {}
 
             # Handle columns in the sim_tasks table
             foreach attr { 
@@ -114,7 +114,7 @@
                 if { [info exists row(recipients)] } {
                     error "You cannot supply both recipient_roles (takes short_name) and recipient (takes role_id)"
                 }
-                set row(recipients) [list]
+                set row(recipients) {}
                 foreach recipient_short_name $row(recipient_roles) {
                     lappend row(recipients) [workflow::role::get_id \
                                                  -workflow_id $workflow_id \
@@ -124,7 +124,7 @@
             }
             
             # Handle auxiliary rows
-            array set aux [list]
+            array set aux {}
             foreach attr { 
                 recipients
             } {