--- loncom/interface/lonhtmlcommon.pm 2009/02/18 19:28:45 1.201
+++ loncom/interface/lonhtmlcommon.pm 2009/04/01 14:22:11 1.205
@@ -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.205 2009/04/01 14:22:11 amueller Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -1305,10 +1305,15 @@ returns: nothing
my @Crumbs;
sub breadcrumbs {
- my ($component,$component_help,$menulink,$helplink,$css_class,$no_mt) = @_;
+ my ($component,$component_help,$menulink,$helplink,$css_class,$no_mt, $no_realBreadcrumb) = @_;
#
$css_class ||= 'LC_breadcrumbs';
my $Str1 = '
';
+
+
+ if($no_realBreadcrumb){
+ $Str1 .= $links.'';
+ } else {
+ $Str1 .= $links.'';
+ }
#
if (defined($component)) {
$Str .= "\n".''
@@ -2091,15 +2102,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 +2126,9 @@ sub generate_menu {
#
# 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)