loncom/interface/lonpreferences.pm - diff

Return to lonpreferences.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.130, 2008/12/06 21:13:58	version 1.131, 2008/12/08 23:09:26
Line 1799 sub print_main_menu {	Line 1799 sub print_main_menu {
# build the data structure for menu generation	# build the data structure for menu generation
my $aboutmeurl='/adm/'.$env{'user.domain'}.'/'.$env{'user.name'}.'/aboutme';	my $aboutmeurl='/adm/'.$env{'user.domain'}.'/'.$env{'user.name'}.'/aboutme';
my $role = ($env{'user.adv'} ? 'Roles' : 'Course');	my $role = ($env{'user.adv'} ? 'Roles' : 'Course');
	my %permissions;
	if (&Apache::lonnet::usertools_access($user,$domain,'aboutme')) {
	$permissions{'aboutme'} = 'F';
	}
my @menu=	my @menu=
({ categorytitle=>'Personal Data',	({ categorytitle=>'Personal Data',
items =>[	items =>[
{ linktext => 'About Me',	{ linktext => 'About Me',
url => $aboutmeurl,	url => $aboutmeurl,
permission => 'F',	permission => $permissions{'aboutme'},
#help => 'Prefs_About_Me',	#help => 'Prefs_About_Me',
icon => 'system-users.png',	icon => 'system-users.png',
linktitle => 'Edit information about yourself that should be displayed on your public profile.'	linktitle => 'Edit information about yourself that should be displayed on your public profile.'