--- loncom/interface/loncreateuser.pm 2003/12/11 14:58:00 1.73 +++ loncom/interface/loncreateuser.pm 2004/01/15 03:18:19 1.76 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Create a user # -# $Id: loncreateuser.pm,v 1.73 2003/12/11 14:58:00 sakharuk Exp $ +# $Id: loncreateuser.pm,v 1.76 2004/01/15 03:18:19 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -124,7 +124,9 @@ sub print_username_entry_form { my @domains = &Apache::loncommon::get_domains(); my $domform = &Apache::loncommon::select_dom_form($defdom,'ccdomain'); my $bodytag =&Apache::loncommon::bodytag( - 'Create Users, Change User Privileges'); + 'Create Users, Change User Privileges'). + &Apache::loncommon::help_open_faq(282). + &Apache::loncommon::help_open_bug('Instructor Interface'); my $selscript=&Apache::loncommon::studentbrowser_javascript(); my $sellink=&Apache::loncommon::selectstudent_link ('crtuser','ccuname','ccdomain'); @@ -140,6 +142,8 @@ sub print_username_entry_form { 'nr' => "Name of Role", 'cre' => "Custom Role Editor" ); + my $helpsiur=&Apache::loncommon::help_open_topic('Course_Change_Privileges'); + my $helpecpr=&Apache::loncommon::help_open_topic('Course_Editing_Custom_Roles'); $r->print(<<"ENDDOCUMENT"); @@ -149,7 +153,7 @@ $selscript $bodytag
-

$lt{siur}

+

$lt{siur}$helpsiur

-

$lt{'ecrp'}

+

$lt{'ecrp'}$helpecpr

$lt{'nr'}: $choice
@@ -281,7 +285,7 @@ $loginscript
$lt{usr}: $sellink
@@ -159,7 +163,7 @@ $lt{'dom'}:$domform
$lt{'idsn'}

-${'hs'}: +$lt{'hs'}:

$lt{'lg'}

$generalrule

@@ -588,7 +592,7 @@ ENDOTHERAUTHS ); $r->print(<$lt{'cs'} - +
${'act'}${'rol'}${'ext'}
@@ -862,7 +866,7 @@ END 'gen' => "Generation" ); $r->print(<<"END"); -

$lt{'usr'} "$ENV{'form.ccuname'}" ${'id'} "$ENV{'form.ccdomain'}"

+

$lt{'usr'} "$ENV{'form.ccuname'}" $lt{'id'} "$ENV{'form.ccdomain'}"

$userenv{'firstname'} $userenv{'middlename'} $userenv{'lastname'}

$lt{'gen'}: $userenv{'generation'}

END @@ -1002,6 +1006,8 @@ END } } } # End of foreach (keys(%ENV)) +# Flush the course logs so reverse user roles immediately updated + &Apache::lonnet::flushcourselogs(); $r->print(''); }
$lt{'act'}$lt{'rol'}$lt{'ext'} $lt{'sta'}$lt{'end'}