[BACK]Return to lonmenu.pm CVS log [TXT] [DIR] Up to [LON-CAPA] / loncom / interface

Diff for /loncom/interface/lonmenu.pm between versions 1.369.2.83.2.16 and 1.369.2.83.2.18

version 1.369.2.83.2.16, 2024/01/02 14:14:47 version 1.369.2.83.2.18, 2024/02/28 19:08:32
Line 266  sub prep_menuitem { Line 266  sub prep_menuitem {
 # @primary_menu is filled within the BEGIN block of this module with   # @primary_menu is filled within the BEGIN block of this module with 
 # entries from mydesk.tab  # entries from mydesk.tab
 sub primary_menu {  sub primary_menu {
     my ($crstype,$ltimenu,$menucoll,$menuref,$links_disabled,$links_target) = @_;      my ($crstype,$ltimenu,$menucoll,$menuref,$links_disabled,$links_target,$collapsible) = @_;
     my (%menu,%ltiexc,%menuopts);      my (%menu,%ltiexc,%menuopts);
     # each element of @primary contains following array:      # each element of @primary contains following array:
     # (link url, icon path, alt text, link text, condition, position)      # (link url, icon path, alt text, link text, condition, position)
Line 437  sub primary_menu { Line 437  sub primary_menu {
     }      }
     my @output = ('','');      my @output = ('','');
     if ($menu{'left'} ne '') {      if ($menu{'left'} ne '') {
           if ($collapsible) {
               $menu{'left'} = ($listclass?'<li class="'.$listclass.'">':'<li>').
                               '&nbsp;</li>'.$menu{'left'};
           }
         $output[0] = "<ol class=\"LC_primary_menu LC_floatleft\">$menu{'left'}</ol>";          $output[0] = "<ol class=\"LC_primary_menu LC_floatleft\">$menu{'left'}</ol>";
     }      }
     if ($menu{'right'} ne '') {      if ($menu{'right'} ne '') {
Line 1331  s&2&1&back.png&&&gopost('/adm/flip','bac Line 1335  s&2&1&back.png&&&gopost('/adm/flip','bac
 s&2&3&forw.png&&&gopost('/adm/flip','forward:'+currentURL)&Next content resource&&3";  s&2&3&forw.png&&&gopost('/adm/flip','forward:'+currentURL)&Next content resource&&3";
             }              }
             $menuitems .= (<<ENDMENUITEMS);              $menuitems .= (<<ENDMENUITEMS);
   
 c&6&3  c&6&3
 c&8&2  c&8&2
 s&8&3&prt.png&$swtext{'prt'}&printout[_1]&gopost('/adm/printout',currentURL)&Prepare a printable document  s&8&3&prt.png&$swtext{'prt'}&printout[_1]&gopost('/adm/printout',currentURL)&Prepare a printable document
Removed from v.1.369.2.83.2.16  
changed lines
  Added in v.1.369.2.83.2.18

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>