[LON-CAPA-cvs] cvs: loncom(GCI_3) /interface lonmainmenu.pm
raeburn
raeburn@source.lon-capa.org
Mon, 08 Nov 2010 19:42:10 -0000
raeburn Mon Nov 8 19:42:10 2010 EDT
Modified files: (Branch: GCI_3)
/loncom/interface lonmainmenu.pm
Log:
- Customization for GCI_3
- No breadcrumbs when displaying "Main Menu" in a Concept Test.
Index: loncom/interface/lonmainmenu.pm
diff -u loncom/interface/lonmainmenu.pm:1.8.4.9 loncom/interface/lonmainmenu.pm:1.8.4.10
--- loncom/interface/lonmainmenu.pm:1.8.4.9 Thu Oct 7 15:25:08 2010
+++ loncom/interface/lonmainmenu.pm Mon Nov 8 19:42:10 2010
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# displays the main menu
#
-# $Id: lonmainmenu.pm,v 1.8.4.9 2010/10/07 15:25:08 raeburn Exp $
+# $Id: lonmainmenu.pm,v 1.8.4.10 2010/11/08 19:42:10 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -87,8 +87,17 @@
$env{'environment.remote'}='off';
# Breadcrumbs
- my $args;
- unless ($custommenu && !$env{'request.course.id'}) {
+ my ($nocrumbs,$args);
+ if ($custommenu) {
+ if ($env{'request.course.id'}) {
+ unless ($gcicourses{$env{'request.course.id'}}) {
+ $nocrumbs = 1;
+ }
+ } else {
+ $nocrumbs = 1;
+ }
+ }
+ unless ($nocrumbs) {
my $brcrum = [];
$args = {bread_crumbs => $brcrum};
}