Index: openacs-4/packages/simulation/tcl/sim-role-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/tcl/sim-role-procs.tcl,v diff -u -r1.9 -r1.9.2.1 --- openacs-4/packages/simulation/tcl/sim-role-procs.tcl 27 Jan 2004 10:33:16 -0000 1.9 +++ openacs-4/packages/simulation/tcl/sim-role-procs.tcl 1 Jun 2004 15:03:31 -0000 1.9.2.1 @@ -172,10 +172,15 @@ } db_1row select_sim_role { - select character_id, - users_per_case - from sim_roles - where role_id = :role_id + select sr.character_id, + sr.users_per_case, + scx.name as character_name, + scx.title as character_title, + scx.item_id as character_item_id + from sim_roles sr left outer join + sim_charactersx scx on (scx.item_id = sr.character_id) left outer join + cr_items ci on (ci.item_id = scx.item_id and ci.live_revision = scx.object_id) + where sr.role_id = :role_id } -column_array local_row array set row [array get local_row]