--- loncom/interface/loncreateuser.pm 2004/01/15 03:18:19 1.76 +++ loncom/interface/loncreateuser.pm 2004/02/01 20:42:01 1.78 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Create a user # -# $Id: loncreateuser.pm,v 1.76 2004/01/15 03:18:19 www Exp $ +# $Id: loncreateuser.pm,v 1.78 2004/02/01 20:42:01 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -263,6 +263,7 @@ ENDFORMINFO 'hs' => "Home Server", 'lg' => "Login Data" ); + my $genhelp=&Apache::loncommon::help_open_topic('Generation'); $r->print(<$lt{'cnu'} @@ -281,7 +282,7 @@ $loginscript $lt{'ln'} -$lt{'gen'} +$lt{'gen'}$genhelp $lt{'idsn'}

@@ -760,10 +761,10 @@ ENDNEWUSERHEAD $ENV{'form.cmiddle'},$ENV{'form.clast'},$ENV{'form.cgen'}, undef,$desiredhost ); - $r->print('Generating user: '.$result); + $r->print(&mt('Generating user').': '.$result); my $home = &Apache::lonnet::homeserver($ENV{'form.ccuname'}, $ENV{'form.ccdomain'}); - $r->print('
'&mt('Home server').': '.$home.' '. + $r->print('
'.&mt('Home server').': '.$home.' '. $Apache::lonnet::libserv{$home}); } elsif (($ENV{'form.login'} ne 'nochange') && ($ENV{'form.login'} ne '' )) {