--- loncom/interface/lonhtmlcommon.pm 2004/05/05 14:12:54 1.68
+++ loncom/interface/lonhtmlcommon.pm 2004/05/10 18:57:43 1.70
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# a pile of common html routines
#
-# $Id: lonhtmlcommon.pm,v 1.68 2004/05/05 14:12:54 matthew Exp $
+# $Id: lonhtmlcommon.pm,v 1.70 2004/05/10 18:57:43 matthew Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -975,23 +975,34 @@ returns: nothing
# The last breadcrumb does not have a link, so handle it separately.
my $last = pop(@Crumbs);
#
- # The first one should be the course, I guess.
+ # The first one should be the course or a menu link
if (!defined($menulink)) { $menulink=1; }
- if ($menulink && exists($ENV{'request.course.id'}) && $ENV{'request.course.id'} ne '') {
- my $cid = $ENV{'request.course.id'};
+ if ($menulink) {
+ my $description = 'Menu';
+ if (exists($ENV{'request.course.id'}) &&
+ $ENV{'request.course.id'} ne '') {
+ $description =
+ $ENV{'course.'.$ENV{'request.course.id'}.'.description'};
+ }
unshift(@Crumbs,{
- href=>'/adm/menu',
- title=>'Go to main menu',
- text=>$ENV{'course.'.$cid.'.description'},
- });
+ href =>'/adm/menu',
+ title =>'Go to main menu',
+ target =>'_top',
+ text =>$description,
+ });
}
my $links .=
join('->',
map {
$faq = $_->{'faq'} if (exists($_->{'faq'}));
$bug = $_->{'bug'} if (exists($_->{'bug'}));
- ''.
- &mt($_->{'text'}).''
+ my $result = '{'target'}) && $_->{'target'} ne '') {
+ $result .= 'target="'.$_->{'target'}.'" ';
+ }
+ $result .='title="'.&mt($_->{'title'}).'">'.
+ &mt($_->{'text'}).'';
+ $result;
} @Crumbs
);
$links .= '->' if ($links ne '');