--- loncom/interface/lonhtmlcommon.pm 2009/02/18 19:28:45 1.201 +++ loncom/interface/lonhtmlcommon.pm 2009/02/22 18:30:27 1.203 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # a pile of common html routines # -# $Id: lonhtmlcommon.pm,v 1.201 2009/02/18 19:28:45 droeschl Exp $ +# $Id: lonhtmlcommon.pm,v 1.203 2009/02/22 18:30:27 harmsja Exp $ # # Copyright Michigan State University Board of Trustees # @@ -2091,15 +2091,15 @@ sub generate_menu { $img->("", { class => "LC_noBorder LC_middle", src => "/res/adm/pages/$$link{icon}", - alt => defined($$link{alttext}) ? - $$link{alttext} : $$link{linktext} + alt => mt(defined($$link{alttext}) ? + $$link{alttext} : $$link{linktext}) }), { href => $$link{url}, - title => $$link{linktitle} + title => mt($$link{linktitle}) }). - $a->($$link{linktext}, { + $a->(mt($$link{linktext}), { href => $$link{url}, - title => $$link{linktitle}, + title => mt($$link{linktitle}), class => "LC_menubuttons_link" }). (defined($$link{help}) ? @@ -2115,9 +2115,9 @@ sub generate_menu { #

title

# the category won't be added if there aren't any links push @categories, - $div->($h3->($$category{categorytitle}, {class=>"LC_hcell"}). + $div->($h3->(mt($$category{categorytitle}), {class=>"LC_hcell"}). $ul->(join('' ,@links), {class =>"LC_ListStyleNormal" }), - {class=>"LC_ContentBoxSpecial"}) if scalar(@links); + {class=>"LC_ContentBoxSpecial LC_400Box"}) if scalar(@links); } # wrap the joined @categories in another
(column layout)