--- loncom/interface/lonmenu.pm 2007/08/30 22:37:27 1.222.2.1 +++ loncom/interface/lonmenu.pm 2007/08/30 22:35:41 1.225 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Routines to control the menu # -# $Id: lonmenu.pm,v 1.222.2.1 2007/08/30 22:37:27 albertel Exp $ +# $Id: lonmenu.pm,v 1.225 2007/08/30 22:35:41 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -547,28 +547,33 @@ $inlineremote[91] $inlineremote[92] $inl ENDINLINEICONS } } else { - $inlinebuttons=(<$inlineremote[21] $inlineremote[23] ENDFIRSTLINE - if (&hidden_button_check() ne 'yes') { - $inlinebuttons .= (<$inlineremote[61]$inlineremote[62]$inlineremote[63] -$inlineremote[71]$inlineremote[72]$inlineremote[73] -$inlineremote[81]$inlineremote[82]$inlineremote[83] -$inlineremote[91]$inlineremote[92]$inlineremote[93] -ENDINLINE } - } - } + if (&hidden_button_check() ne 'yes') { + foreach my $row (6..9) { + if ($inlineremote[${row}.'1'] ne '' + || $inlineremote[$row.'2'] ne '' + || $inlineremote[$row.'3'] ne '') { + $inlinebuttons .= <<"ENDLINE"; +$inlineremote["${row}1"]$inlineremote["${row}2"]$inlineremote["${row}3"] +ENDLINE + } + } + } + } + } } $result =(< // BEGIN LON-CAPA Internal $timesync -$newmail $tablestart $inlinebuttons +$newmail $tableend