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

Diff for /loncom/interface/lonhtmlcommon.pm between versions 1.187 and 1.192

version 1.187, 2008/12/01 16:33:32 version 1.192, 2008/12/05 10:23:56
Line 467  document.$formname.$dname\_year.value, Line 467  document.$formname.$dname\_year.value,
     }      }
 </script>  </script>
 ENDJS  ENDJS
     $result .= '  <span style="white-space: nowrap;">';      $result .= '  <span class="LC_nobreak">';
     my $monthselector = qq{<select name="$dname\_month" $special $state onchange="javascript:$dname\_checkday()" >};      my $monthselector = qq{<select name="$dname\_month" $special $state onchange="javascript:$dname\_checkday()" >};
     # Month      # Month
     my @Months = qw/January February  March     April   May      June       my @Months = qw/January February  March     April   May      June 
Line 2047  sub generate_menu { Line 2047  sub generate_menu {
     my $menu_html = qq|<div class="columnSection">|;      my $menu_html = qq|<div class="columnSection">|;
   
     foreach my $category (@menu) { #FIXME: insert appropriate classnames for styles when they're finished.      foreach my $category (@menu) { #FIXME: insert appropriate classnames for styles when they're finished.
  $menu_html .='<div class="ContentBox">   $menu_html .='<div class="ContentBoxSpecial">
  <h3 class="">'.$category->{'categorytitle'}.'</h3>   <h3 class="hcell">'.mt($category->{'categorytitle'}).'</h3>
  <ul class="ListStyleNormal">';   <ul class="ListStyleNormal">';
  foreach my $item ( @{ $category->{items} } ) {   foreach my $item ( @{ $category->{items} } ) {
     next unless $item->{'permission'};      next unless $item->{'permission'};
     $menu_html .= qq|<li class=""><a href="$item->{'url'}" title="$item->{'linktitle'}">|;      $menu_html .= qq|<li class="LC_menubuttons_inline_text"><a href="$item->{'url'}" title="|.mt($item->{'linktitle'}).'">';
             if($item->{'icon'}){              if($item->{'icon'}){
                 $menu_html .= qq|<img class ="noBorder" src="/res/adm/pages/$item->{'icon'}" alt="|;                  $menu_html .= qq|<img class ="noBorder middle" src="/res/adm/pages/$item->{'icon'}" alt="|;
  if($item->{'alttext'}){   if($item->{'alttext'}){
     $menu_html .= qq|$item->{'alttext'}"/></a>|;      $menu_html .= $item->{'alttext'}.'"/></a>';
  } else { #use linktext as alt text for the icon   } else { #use linktext as alt text for the icon
     $menu_html .= qq|$item->{'linktext'}"/></a>|;      $menu_html .= qq|$item->{'linktext'}"/></a>|;
                 }                   } 
             }              }
     $menu_html .= qq|<a href="$item->{'url'}" title="$item->{'linktitle'}">|;      $menu_html .= qq|<a href="$item->{'url'}" title="|.mt($item->{'linktitle'}).'">';
             $menu_html .= &mt($item->{'linktext'}).'</a>';              $menu_html .= mt($item->{'linktext'}).'</a>';
     if (exists($item->{'help'})) {      if (exists($item->{'help'})) {
  $menu_html .= &Apache::loncommon::help_open_topic($item->{'help'});   $menu_html .= Apache::loncommon::help_open_topic($item->{'help'});
     }      }
     $menu_html .= '</li>';      $menu_html .= '</li>';
  }   }
Removed from v.1.187  
changed lines
  Added in v.1.192

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