Index: openacs-4/packages/imsld/www/admin/imsld-create-instance.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/imsld/www/admin/imsld-create-instance.tcl,v diff -u -N -r1.3 -r1.4 --- openacs-4/packages/imsld/www/admin/imsld-create-instance.tcl 19 May 2006 17:26:02 -0000 1.3 +++ openacs-4/packages/imsld/www/admin/imsld-create-instance.tcl 29 May 2007 09:12:09 -0000 1.4 @@ -12,6 +12,8 @@ run_id parent_group_id:optional } +set page_title "[_ imsld.Create_role_instance]" +set context "" db_1row get_imsld_role_info {} set number_of_groups [llength [db_list get_related_groups {}]] @@ -21,7 +23,7 @@ if { !([string eq $number_of_groups "0"] || [string eq $create_new_p "t"] ) } { set mensaje "

Current Unit of Learning does not allow creation of multiple instances of this role.

- Go back" + [_ imsld.Go_back]" ad_return_complaint 1 $mensaje ad_script_abort }