Index: openacs-4/packages/simulation/lib/sim-template-tasks.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/lib/sim-template-tasks.tcl,v diff -u -r1.46 -r1.47 --- openacs-4/packages/simulation/lib/sim-template-tasks.tcl 31 Oct 2006 09:00:05 -0000 1.46 +++ openacs-4/packages/simulation/lib/sim-template-tasks.tcl 25 Apr 2018 19:47:48 -0000 1.47 @@ -32,7 +32,7 @@ if { $display_mode == "edit"} { set list_actions [list "Add a Task" [export_vars -base task-edit { workflow_id parent_action_id {return_url "[ad_return_url]" } }] {}] } else { - set list_actions [list] + set list_actions {} } set show_states_p 1 @@ -107,7 +107,7 @@ } if { !$show_states_p } { - set states [list] + set states {} } else { lappend elements state_spacer { label "
Enabled in States:" @@ -116,7 +116,7 @@ html { style "border-left: 2px dotted #A0BDEB;" } } - set states [list] + set states {} db_foreach select_states { select s.state_id, @@ -176,7 +176,7 @@ lappend extend state_${state_id}_url } -array set enabled_in_state [list] +array set enabled_in_state {} # Ordering by assigned_p, so we get assigned states ('t') last db_foreach select_enabled_in_states {