|
version 1.39, 2004/03/26 17:11:37
|
version 1.40, 2004/03/26 20:26:30
|
|
Line 658 sub handler {
|
Line 658 sub handler {
|
| my $currentauth=&Apache::lonnet::queryauthenticate($user,$domain); |
my $currentauth=&Apache::lonnet::queryauthenticate($user,$domain); |
| if ($currentauth =~ /^(unix|internal):/) { |
if ($currentauth =~ /^(unix|internal):/) { |
| push (@Options,({ action => 'changepass', |
push (@Options,({ action => 'changepass', |
| linktext => 'Change password', |
linktext => 'Change Password', |
| href => '/adm/preferences', |
href => '/adm/preferences', |
| help => 'Change_Password', |
help => 'Change_Password', |
| subroutine => \&passwordchanger, |
subroutine => \&passwordchanger, |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonpreferences.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface