--- loncom/interface/lonmenu.pm 2016/04/02 04:30:20 1.443 +++ loncom/interface/lonmenu.pm 2016/04/04 17:24:05 1.444 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Routines to control the menu # -# $Id: lonmenu.pm,v 1.443 2016/04/02 04:30:20 raeburn Exp $ +# $Id: lonmenu.pm,v 1.444 2016/04/04 17:24:05 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -840,11 +840,27 @@ ENDMENUITEMS $menuitems = "c&3&1"; if (($crstype ne 'Placement') || ($env{'request.role.adv'})) { $menuitems.=" -s&2&1&back.png&&&gopost('/adm/flip','back:'+currentURL)&Previous content resource&&1"; +s&2&1&back.png&&&gopost('/adm/flip','back:'+currentURL)&Previous content resource&&1 +s&2&3&forw.png&&&gopost('/adm/flip','forward:'+currentURL)&Next content resource&&3"; + } else { +# Suppress display of backward arrow for Placement Tests +# Suppress display of forward arrow for Placement Tests if this is the last resource. + my $showforw = 1; + if ($env{'request.symb'}) { + my $navmap = Apache::lonnavmaps::navmap->new(); + if (ref($navmap)) { + if (&Apache::lonplacementtest::is_lastres($env{'request.symb'},$navmap)) { + $showforw = 0; + } + } + } + if ($showforw) { + $menuitems.=" +s&2&3&forw.png&&&gopost('/adm/flip','forward:'+currentURL)&Next content resource&&3"; + } } $menuitems .= (<