Index: openacs-4/packages/imsld/tcl/imsld-condition-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/imsld/tcl/imsld-condition-procs.tcl,v
diff -u -r1.24.4.1 -r1.24.4.2
--- openacs-4/packages/imsld/tcl/imsld-condition-procs.tcl	27 Jun 2007 10:21:58 -0000	1.24.4.1
+++ openacs-4/packages/imsld/tcl/imsld-condition-procs.tcl	9 Jul 2007 16:09:51 -0000	1.24.4.2
@@ -303,7 +303,7 @@
             and content_revision__is_live(activity_id) = 't'
         }] } {
             # mark the support activity completed for all the users in the run
-            set role_part_id_list [imsld::get_role_part_from_activity -activity_type learning -leaf_id $activity_item_id]
+            set role_part_id_list [imsld::get_role_part_from_activity -activity_type support -leaf_id $activity_item_id]
 
             set users_in_run [db_list get_users_in_run {
                 select gmm.member_id 
@@ -331,7 +331,7 @@
                         -act_id $act_id \
                         -role_part_id $role_part_id \
                         -element_id $activity_id \
-                        -type learning \
+                        -type support \
                         -code_call
                 }
             }
@@ -356,6 +356,7 @@
                 and ar1.object_id_one=gmm.group_id 
                 group by member_id
             }]
+
             foreach user $users_in_run {
                 if { [imsld::user_participate_p -run_id $run_id -act_id $act_id -user_id $user] } {
                     imsld::mark_act_finished -act_id $act_id \