|
version 1.37, 2002/08/07 18:04:35
|
version 1.38, 2002/08/07 18:49:36
|
|
Line 234 ENDCHANGEUSER
|
Line 234 ENDCHANGEUSER
|
| <tr> |
<tr> |
| END |
END |
| foreach ('firstname','middlename','lastname','generation') { |
foreach ('firstname','middlename','lastname','generation') { |
| my $result = &Apache::lonnet::allowed('mau',$ccdomain); |
|
| &Apache::lonnet::logthis("allowed: mau, $ccdomain = $result"); |
|
| if (&Apache::lonnet::allowed('mau',$ccdomain)) { |
if (&Apache::lonnet::allowed('mau',$ccdomain)) { |
| $r->print(<<"END"); |
$r->print(<<"END"); |
| <td><input type="text" name="c$_" value="$userenv{$_}" size="15"/></td> |
<td><input type="text" name="c$_" value="$userenv{$_}" size="15"/></td> |
![[BACK]](/icons/back.gif){kind=icon}
Return to loncreateuser.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface