Index: openacs-4/packages/lorsm/tcl/lorsm-callback-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/lorsm/tcl/lorsm-callback-procs.tcl,v diff -u -r1.5 -r1.6 --- openacs-4/packages/lorsm/tcl/lorsm-callback-procs.tcl 12 Dec 2008 14:25:33 -0000 1.5 +++ openacs-4/packages/lorsm/tcl/lorsm-callback-procs.tcl 15 Feb 2009 01:46:46 -0000 1.6 @@ -32,14 +32,14 @@ upvar $elements_name my_elements set my_query { - select d.id,i.course_name,l.start_time,l.end_time - from lorsm_student_track l, dotlrn_users d, ims_cp_manifests i + select u.id,i.course_name,l.start_time,l.end_time + from lorsm_student_track l, users u, ims_cp_manifests i where l.course_id IN ( select distinct l.course_id from lorsm_student_track l where l.community_id=:class_instance_id group by l.course_id) - and l.user_id = d.user_id + and l.user_id = u.user_id and l.course_id = i.man_id } set my_elements ""