![[BACK]](/icons/back.gif){kind=icon}
Return to lond CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom|
Return to lond CVS log | Up to [LON-CAPA] / loncom |
| version 1.523, 2016/07/25 19:49:45 | version 1.524, 2016/08/11 16:35:14 |
|---|---|
| Line 7726 sub make_passwd_file { | Line 7726 sub make_passwd_file { |
| my $pf = IO::File->new(">$passfilename"); | my $pf = IO::File->new(">$passfilename"); |
| if($pf) { | if($pf) { |
| print $pf "localauth:$npass\n"; | print $pf "localauth:$npass\n"; |
| &update_passwd_history($uname,$udom,$umode,$action); | |
| } else { | } else { |
| $result = "pass_file_failed_error"; | $result = "pass_file_failed_error"; |
| } | } |