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 -r1.5 -r1.6 --- openacs-4/packages/imsld/www/admin/imsld-create-instance.tcl 30 May 2007 08:36:22 -0000 1.5 +++ openacs-4/packages/imsld/www/admin/imsld-create-instance.tcl 17 Apr 2008 17:17:54 -0000 1.6 @@ -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 {}]] @@ -20,8 +22,8 @@ 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" + set mensaje "

[_ imsld.lt_Current_Unit_of_Learn]

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