--- loncom/interface/lonmenu.pm 2010/01/05 15:27:31 1.309.2.7 +++ loncom/interface/lonmenu.pm 2010/01/06 22:40:34 1.309.2.10 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Routines to control the menu # -# $Id: lonmenu.pm,v 1.309.2.7 2010/01/05 15:27:31 raeburn Exp $ +# $Id: lonmenu.pm,v 1.309.2.10 2010/01/06 22:40:34 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1396,8 +1396,9 @@ sub inlinemenu { if ($switcher) { $output .= 'choose role'.$switcher.''; } - $output .= 'communication'.&mt('Send/Display Messages').''; - if ($env{'request.course.id'}) { + $output .= 'communication'.&mt('Send/Display Messages').''. +'user preferences'.&mt('Set my user preferences').''; + if ($env{'request.course.id'}) { if (($context eq 'gcicustom') && (&Apache::lonnet::allowed('mdc',$env{'request.course.id'}))) { $output.= ''. ''. @@ -1406,7 +1407,8 @@ sub inlinemenu { ''."\n". ''."\n". ''."\n". - '
course contentsConcept Test Contents
assemble testAssemble Concept Test
user privs'.&mt('Manage Enrollment').'
what is new'.&mt("What's New?").'
'; + 'what is new'.&mt("What's New?").''. + 'Test Statistics'.&mt("Concept Test Statistics").''; } else { my $navtext = &mt('Table of Contents'); if ($env{'request.role.domain'} eq 'gcitest') { @@ -1747,7 +1749,7 @@ sub utilityfunctions { my $gcimenujs; if ($custommenu) { - my %concepttests = &Apache::loncommon::existing_gcitest_courses(); + my %concepttests = &Apache::loncommon::existing_gcitest_courses('cc'); my $managetesturl = '/adm/menu'; my $createtesturl = '/adm/requestcourse'; if (($env{'request.course.id'}) &&