Index: openacs-4/packages/dotlrn-ecommerce/lib/section.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-ecommerce/lib/section.tcl,v
diff -u -r1.23 -r1.24
--- openacs-4/packages/dotlrn-ecommerce/lib/section.tcl	5 Aug 2005 12:13:22 -0000	1.23
+++ openacs-4/packages/dotlrn-ecommerce/lib/section.tcl	6 Aug 2005 14:15:55 -0000	1.24
@@ -452,7 +452,7 @@
 	# HAM : Let's add chosen instructors in the role of instructors 
 	# and assistants in the role of assistants
 	foreach instructor $instructors {
-		dotlrn_club::add_user -rel_type "dotlrn_admin_rel" -community_id $community_id -user_id $instructor -member_state "approved"
+		dotlrn_club::add_user -rel_type "dc_instructor_rel" -community_id $community_id -user_id $instructor -member_state "approved"
 	}
 	foreach assistant $assistants {
 		dotlrn_club::add_user -rel_type "dc_instructor_rel" -community_id $community_id -user_id $assistant -member_state "approved"
@@ -792,4 +792,4 @@
 # Used by en_US version of new_class_instance message
 set class_instances_pretty_name [parameter::get -localize -parameter class_instances_pretty_name]
 set f [rp_getform]
-ns_set print $f
\ No newline at end of file
+ns_set print $f