loncom/interface/lonpreferences.pm - diff

Return to lonpreferences.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.125, 2008/07/18 12:36:11	version 1.125.2.1, 2008/12/12 19:57:58
Line 1782 sub handler {	Line 1782 sub handler {
text => 'Change Message Forwarding/Notification'},	text => 'Change Message Forwarding/Notification'},
printmenu => 'no',	printmenu => 'no',
subroutine => \&verify_and_change_msgforward }));	subroutine => \&verify_and_change_msgforward }));
my $aboutmeaction=	if (&Apache::lonnet::usertools_access($user,$domain,'aboutme')) {
'/adm/'.$env{'user.domain'}.'/'.$env{'user.name'}.'/aboutme';	my $aboutmeaction = '/adm/'.$domain.'/'.$user.'/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},
help => 'Prefs_About_Me',	help => 'Prefs_About_Me',
href => $aboutmeaction});	href => $aboutmeaction});
	}
push (@Options,({ action => 'changecolors',	push (@Options,({ action => 'changecolors',
linktext => 'Change Color Scheme',	linktext => 'Change Color Scheme',
href => '/adm/preferences',	href => '/adm/preferences',