--- loncom/interface/lonpreferences.pm 2008/12/06 20:34:09 1.129 +++ loncom/interface/lonpreferences.pm 2008/12/08 23:09:26 1.131 @@ -1,7 +1,7 @@ # The LearningOnline Network # Preferences # -# $Id: lonpreferences.pm,v 1.129 2008/12/06 20:34:09 schafran Exp $ +# $Id: lonpreferences.pm,v 1.131 2008/12/08 23:09:26 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -772,8 +772,8 @@ sub msgforwardchanger { foad => 'Forwarding Address(es)', noti => 'Notification E-mail Address(es)', foad_exmpl => 'e.g. userA:domain1,userB:domain2,...', - mnot => 'E-mail Address(es) which should be notified about new LON-CAPA messages', # old: 'Message -Notification Email Address(es)', + mnot => 'E-mail Address(es) which should be notified about new LON-CAPA messages', + # old: 'Message Notification Email Address(es)', mnot_exmpl => 'e.g. joe@doe.com', chg => 'Change', email => 'The e-mail address entered in row ', @@ -1799,12 +1799,16 @@ sub print_main_menu { # build the data structure for menu generation my $aboutmeurl='/adm/'.$env{'user.domain'}.'/'.$env{'user.name'}.'/aboutme'; my $role = ($env{'user.adv'} ? 'Roles' : 'Course'); +my %permissions; +if (&Apache::lonnet::usertools_access($user,$domain,'aboutme')) { + $permissions{'aboutme'} = 'F'; +} my @menu= ({ categorytitle=>'Personal Data', items =>[ { linktext => 'About Me', url => $aboutmeurl, - permission => 'F', + permission => $permissions{'aboutme'}, #help => 'Prefs_About_Me', icon => 'system-users.png', linktitle => 'Edit information about yourself that should be displayed on your public profile.'