[LON-CAPA-cvs] cvs: loncom(GCI_3) /interface lonhtmlcommon.pm
raeburn
raeburn@source.lon-capa.org
Mon, 07 Dec 2009 17:30:01 -0000
raeburn Mon Dec 7 17:30:01 2009 EDT
Modified files: (Branch: GCI_3)
/loncom/interface lonhtmlcommon.pm
Log:
- Customization for GCI_3
- Ability to suppress initial "Menu" item in breadcrumbs.
- Do not use course title as text for first item in breadcrumbs.
Index: loncom/interface/lonhtmlcommon.pm
diff -u loncom/interface/lonhtmlcommon.pm:1.253 loncom/interface/lonhtmlcommon.pm:1.253.2.1
--- loncom/interface/lonhtmlcommon.pm:1.253 Thu Dec 3 02:13:28 2009
+++ loncom/interface/lonhtmlcommon.pm Mon Dec 7 17:30:01 2009
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# a pile of common html routines
#
-# $Id: lonhtmlcommon.pm,v 1.253 2009/12/03 02:13:28 www Exp $
+# $Id: lonhtmlcommon.pm,v 1.253.2.1 2009/12/07 17:30:01 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -1378,19 +1378,15 @@
# The first one should be the course or a menu link
if (!defined($menulink)) { $menulink=1; }
if ($menulink) {
- my $description = 'Menu';
- my $no_mt_descr = 0;
- if (exists($env{'request.course.id'}) &&
- $env{'request.course.id'} ne '') {
- $description =
- $env{'course.'.$env{'request.course.id'}.'.description'};
- $no_mt_descr = 1;
- }
- $menulink = { href =>'/adm/menu',
- title =>'Go to main menu',
- target =>'_top',
- text =>$description,
- no_mt =>$no_mt_descr, };
+ unless ($menulink eq '_nomenu') {
+ my $description = 'Menu';
+ my $no_mt_descr = 0;
+ $menulink = { href =>'/adm/menu',
+ title =>'Go to main menu',
+ target =>'_top',
+ text =>$description,
+ no_mt =>$no_mt_descr, };
+ }
if($last) {
#$last set, so we have some crumbs
unshift(@Crumbs,$menulink);