[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};
     }