--- loncom/interface/lonhtmlcommon.pm 2008/12/06 17:29:34 1.193 +++ loncom/interface/lonhtmlcommon.pm 2008/12/17 12:59:49 1.196 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # a pile of common html routines # -# $Id: lonhtmlcommon.pm,v 1.193 2008/12/06 17:29:34 bisitz Exp $ +# $Id: lonhtmlcommon.pm,v 1.196 2008/12/17 12:59:49 harmsja Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1306,7 +1306,7 @@ returns: nothing my ($component,$component_help,$menulink,$helplink,$css_class) = @_; # $css_class ||= 'LC_breadcrumbs'; - my $Str = "\n".'<table class="'.$css_class.'"><tr><td>'; + my $Str = "\n".'<table class="'.$css_class.'"><tr><td><ol id="LC_MenuBreadcrumbs">'; # # Make the faq and bug data cascade my $faq = ''; @@ -1342,25 +1342,25 @@ returns: nothing $faq = $_->{'faq'} if (exists($_->{'faq'})); $bug = $_->{'bug'} if (exists($_->{'bug'})); $help = $_->{'help'} if (exists($_->{'help'})); - my $result = '<a href="'.$_->{'href'}.'" '; + my $result = '<li><a href="'.$_->{'href'}.'" '; if (defined($_->{'target'}) && $_->{'target'} ne '') { $result .= 'target="'.$_->{'target'}.'" '; } if ($_->{'no_mt'}) { $result .='title="'.$_->{'title'}.'">'. - $_->{'text'}.'</a>'; + $_->{'text'}.'</a></li>'; } else { $result .='title="'.&mt($_->{'title'}).'">'. - &mt($_->{'text'}).'</a>'; + &mt($_->{'text'}).'</a></li>'; } $result; } @Crumbs ); $links .= $crumbsymbol if ($links ne ''); if ($last->{'no_mt'}) { - $links .= '<b>'.$last->{'text'}.'</b>'; + $links .= '<li><b>'.$last->{'text'}.'</b></li>'; } else { - $links .= '<b>'.&mt($last->{'text'}).'</b>'; + $links .= '<li><b>'.&mt($last->{'text'}).'</b></li>'; } # my $icons = ''; @@ -1380,7 +1380,7 @@ returns: nothing $faq,$bug); } # - $Str .= $links.'</td>'; + $Str .= $links.'</ol></td>'; # if (defined($component)) { $Str .= '<td class="'.$css_class.'_component">'. @@ -2053,17 +2053,17 @@ END sub generate_menu { my @menu = @_; - my $menu_html = qq|<div class="columnSection">|; + my $menu_html = qq|<div class="LC_columnSection">|; foreach my $category (@menu) { #FIXME: insert appropriate classnames for styles when they're finished. - $menu_html .='<div class="ContentBoxSpecial"> - <h3 class="hcell">'.mt($category->{'categorytitle'}).'</h3> - <ul class="ListStyleNormal">'; + $menu_html .='<div class="LC_ContentBoxSpecial"> + <h3 class="LC_hcell">'.mt($category->{'categorytitle'}).'</h3> + <ul class="LC_ListStyleNormal">'; foreach my $item ( @{ $category->{items} } ) { next unless $item->{'permission'}; $menu_html .= qq|<li class="LC_menubuttons_inline_text"><a href="$item->{'url'}" title="|.mt($item->{'linktitle'}).'">'; if($item->{'icon'}){ - $menu_html .= qq|<img class ="noBorder middle" src="/res/adm/pages/$item->{'icon'}" alt="|; + $menu_html .= qq|<img class ="LC_noBorder LC_middle" src="/res/adm/pages/$item->{'icon'}" alt="|; if($item->{'alttext'}){ $menu_html .= $item->{'alttext'}.'"/></a>'; } else { #use linktext as alt text for the icon @@ -2077,7 +2077,7 @@ sub generate_menu { } $menu_html .= '</li>'; } - $menu_html .= '</div>'; + $menu_html .= '</ul></div>'; } $menu_html .= qq|</div>|; return $menu_html;