Index: openacs-4/packages/simulation/tcl/character-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/simulation/tcl/character-procs.tcl,v diff -u -N -r1.3.2.2 -r1.3.2.3 --- openacs-4/packages/simulation/tcl/character-procs.tcl 2 Nov 2006 10:44:12 -0000 1.3.2.2 +++ openacs-4/packages/simulation/tcl/character-procs.tcl 15 Feb 2007 14:01:32 -0000 1.3.2.3 @@ -22,10 +22,11 @@ db_1row select_character_info { select sc.*, cr.title, cr.description - from sim_characters sc, cr_revisions cr, cr_items ci + from sim_charactersx sc, cr_revisions cr, cr_items ci where sc.character_id = cr.revision_id and cr.item_id = ci.item_id and (sc.character_id = :character_id or ci.item_id = :character_id) + and ci.live_revision = sc.object_id } -column_array row }