--- loncom/interface/loncreateuser.pm 2007/12/05 17:13:34 1.199 +++ loncom/interface/loncreateuser.pm 2007/12/05 17:40:29 1.201 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Create a user # -# $Id: loncreateuser.pm,v 1.199 2007/12/05 17:13:34 raeburn Exp $ +# $Id: loncreateuser.pm,v 1.201 2007/12/05 17:40:29 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1198,6 +1198,10 @@ ENDBADAUTH } } else { # Authentication type is valid &initialize_authen_forms($ccdomain,$currentauth); + my $authformnop_row; + if (&Apache::lonnet::allowed('mau',$ccdomain)) { + $authformnop_row = &Apache::loncommon::start_data_table_row(); + } my ($authformcurrent,$authform_other,$can_modify) = &modify_login_block($ccdomain,$currentauth); if (&Apache::lonnet::allowed('mau',$ccdomain)) { @@ -1213,7 +1217,7 @@ ENDBADAUTH ''."\n". '
+ | $lt{'frst'} | $lt{'mddl'} | $lt{'lst'} | $lt{'gen'} | $lt{'id'} | $lt{'mail'} | -$lt{'disk'} | |
---|---|---|---|---|---|---|---|---|
$lt{'prvs'} | +$lt{'disk'} | +END + $r->print(&Apache::loncommon::end_data_table_header_row(). + &Apache::loncommon::start_data_table_row()); + $r->print(<<"END"); +$lt{'prvs'} | $userenv{'firstname'} | $userenv{'middlename'} | $userenv{'lastname'} | @@ -1714,17 +1724,21 @@ sub update_user_data {$userenv{'id'} | $userenv{'permanentemail'} | $oldportfolioquota Mb | -
$lt{'chto'} | +END + $r->print(&Apache::loncommon::end_data_table_row(). + &Apache::loncommon::start_data_table_row()); + $r->print(<<"END"); +$lt{'chto'} | $env{'form.cfirstname'} | $env{'form.cmiddlename'} | $env{'form.clastname'} | $env{'form.cgeneration'} | $env{'form.cid'} | $env{'form.cpermanentemail'} | -$newportfolioquota Mb $defquotatext |