version 1.39, 2004/03/26 17:11:37
|
version 1.41, 2004/03/26 20:29:35
|
Line 25
|
Line 25
|
# |
# |
# http://www.lon-capa.org/ |
# http://www.lon-capa.org/ |
# |
# |
# 2/13/02 2/14 2/15 Matthew Hall |
|
# |
|
# This package uses the "londes.js" javascript code. |
# This package uses the "londes.js" javascript code. |
# |
# |
# TODOs that have to be completed: |
# TODOs that have to be completed: |
Line 658 sub handler {
|
Line 656 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, |
Line 711 sub handler {
|
Line 709 sub handler {
|
'/adm/'.$ENV{'user.domain'}.'/'.$ENV{'user.name'}.'/aboutme'; |
'/adm/'.$ENV{'user.domain'}.'/'.$ENV{'user.name'}.'/aboutme'; |
push (@Options,{ action => 'none', |
push (@Options,{ action => 'none', |
linktext => |
linktext => |
q{Edit the 'About Me' personal information screen}, |
q{Edit the 'About Me' Personal Information Screen}, |
href => $aboutmeaction}); |
href => $aboutmeaction}); |
push (@Options,({ action => 'changecolors', |
push (@Options,({ action => 'changecolors', |
linktext => 'Change Color Scheme', |
linktext => 'Change Color Scheme', |