--- loncom/interface/lonhtmlcommon.pm 2008/12/06 17:29:34 1.193
+++ loncom/interface/lonhtmlcommon.pm 2009/01/20 16:38:39 1.198
@@ -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.198 2009/01/20 16:38:39 bisitz Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -1278,6 +1278,8 @@ Inputs: $component (the large text on th
$menulink (boolean, controls whether to include a link to /adm/menu)
$helplink (if 'nohelp' don't include the orange help link)
$css_class (optional name for the class to apply to the table for CSS)
+ $no_mt (optional flag, 1 if &mt() is _not_ to be applied to $component
+ when including the text on the right.
Returns a string containing breadcrumbs for the current page.
=item clear_breadcrumbs
@@ -1303,10 +1305,10 @@ returns: nothing
my @Crumbs;
sub breadcrumbs {
- my ($component,$component_help,$menulink,$helplink,$css_class) = @_;
+ my ($component,$component_help,$menulink,$helplink,$css_class,$no_mt) = @_;
#
$css_class ||= 'LC_breadcrumbs';
- my $Str = "\n".'
';
+ my $Str = "\n".'
';
#
# Make the faq and bug data cascade
my $faq = '';
@@ -1342,25 +1344,25 @@ returns: nothing
$faq = $_->{'faq'} if (exists($_->{'faq'}));
$bug = $_->{'bug'} if (exists($_->{'bug'}));
$help = $_->{'help'} if (exists($_->{'help'}));
- my $result = '{'target'}) && $_->{'target'} ne '') {
$result .= 'target="'.$_->{'target'}.'" ';
}
if ($_->{'no_mt'}) {
$result .='title="'.$_->{'title'}.'">'.
- $_->{'text'}.'';
+ $_->{'text'}.'';
} else {
$result .='title="'.&mt($_->{'title'}).'">'.
- &mt($_->{'text'}).'';
+ &mt($_->{'text'}).'';
}
$result;
} @Crumbs
);
$links .= $crumbsymbol if ($links ne '');
if ($last->{'no_mt'}) {
- $links .= ''.$last->{'text'}.'';
+ $links .= '