Index: openacs-4/packages/imsld/www/admin/imsld-role-members.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/imsld/www/admin/imsld-role-members.tcl,v diff -u -r1.3 -r1.4 --- openacs-4/packages/imsld/www/admin/imsld-role-members.tcl 24 Apr 2006 09:40:20 -0000 1.3 +++ openacs-4/packages/imsld/www/admin/imsld-role-members.tcl 16 May 2006 09:24:36 -0000 1.4 @@ -9,6 +9,7 @@ role:optional {group_instance 0} imsld_id + run_id members_list:optional } @@ -62,12 +63,12 @@ set create_instance_url imsld-create-instance set bulk_actions "{Create new instance} $create_instance_url {Create a new instance of a role}" set bulk_actions_not "{Create new instance} $create_instance_url {Create a new instance of a role}" - set bulk_action_export_vars "{imsld_id} {role}" + set bulk_action_export_vars "{imsld_id} {role} {run_id}" } else { set bulk_actions "{<------} {imsld-role-remove-members} {Remove selected members from the group}" set bulk_actions_not "{------->} {imsld-role-add-members} {Add selected members to the group}" - set bulk_action_export_vars "{group_instance} {role} {imsld_id} {members_list}" + set bulk_action_export_vars "{group_instance} {role} {imsld_id} {run_id} {members_list}" } @@ -109,4 +110,4 @@ db_multirow asign_members get_users_list {} db_multirow asign_not_members get_not_users_list {} -ad_form -name confirm -action imsld-role-confirm -export {imsld_id role group_instance members_list} +ad_form -name confirm -action imsld-role-confirm -export {imsld_id run_id role group_instance members_list}