--- loncom/interface/loncreateuser.pm 2003/10/18 16:06:47 1.70 +++ loncom/interface/loncreateuser.pm 2003/12/10 19:34:53 1.71 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Create a user # -# $Id: loncreateuser.pm,v 1.70 2003/10/18 16:06:47 www Exp $ +# $Id: loncreateuser.pm,v 1.71 2003/12/10 19:34:53 sakharuk Exp $ # # Copyright Michigan State University Board of Trustees # @@ -131,6 +131,14 @@ sub print_username_entry_form { my %existingroles=&my_custom_roles(); my $choice=&Apache::loncommon::select_form('make new role','rolename', ('make new role' => 'Generate new role ...',%existingroles)); + my %lt=&Apache::lonlocal::texthash( + 'siur' => "Set Individual User Roles", + 'usr' => "Username", + 'dom' => "Domain", + 'usrr' => "User Roles", + 'ecrp' => "Edit Custom Role Privileges", + 'cre' => "Custom Role Editor" + ); $r->print(<<"ENDDOCUMENT"); @@ -140,19 +148,19 @@ $selscript $bodytag
-

Set Individual User Roles

+

$lt{siur}

- +$lt{'dom'}:
Username: +
$lt{usr}: $sellink
-Domain:$domform
$domform
- +
-

Edit Custom Role Privileges

+

$lt{'ecrp'}

Name of Role: $choice
- + ENDDOCUMENT