[LON-CAPA-cvs] cvs: loncom(GCI_3) /auth lonroles.pm /interface lonmenu.pm

raeburn raeburn@source.lon-capa.org
Wed, 06 Jan 2010 22:40:35 -0000


raeburn		Wed Jan  6 22:40:35 2010 EDT

  Modified files:              (Branch: GCI_3)
    /loncom/auth	lonroles.pm 
    /loncom/interface	lonmenu.pm 
  Log:
  - Customization for GCI_3.
    &loncommon::existing_gcitest_courses() requires role as argument.
  
  
Index: loncom/auth/lonroles.pm
diff -u loncom/auth/lonroles.pm:1.240.2.7 loncom/auth/lonroles.pm:1.240.2.8
--- loncom/auth/lonroles.pm:1.240.2.7	Tue Jan  5 15:30:25 2010
+++ loncom/auth/lonroles.pm	Wed Jan  6 22:40:26 2010
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # User Roles Screen
 #
-# $Id: lonroles.pm,v 1.240.2.7 2010/01/05 15:30:25 raeburn Exp $
+# $Id: lonroles.pm,v 1.240.2.8 2010/01/06 22:40:26 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -728,7 +728,7 @@
             &Apache::loncommon::end_page();
             return OK;
         }
-        my %courses = &Apache::loncommon::existing_gcitest_courses();
+        my %courses = &Apache::loncommon::existing_gcitest_courses('cc');
         $env{'browser.interface'}='faketextual';
         $env{'environment.remote'}='off';
         my $numcourses = keys(%courses);
Index: loncom/interface/lonmenu.pm
diff -u loncom/interface/lonmenu.pm:1.309.2.9 loncom/interface/lonmenu.pm:1.309.2.10
--- loncom/interface/lonmenu.pm:1.309.2.9	Wed Jan  6 18:19:59 2010
+++ loncom/interface/lonmenu.pm	Wed Jan  6 22:40:34 2010
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Routines to control the menu
 #
-# $Id: lonmenu.pm,v 1.309.2.9 2010/01/06 18:19:59 raeburn Exp $
+# $Id: lonmenu.pm,v 1.309.2.10 2010/01/06 22:40:34 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1749,7 +1749,7 @@
      
     my $gcimenujs;
     if ($custommenu) {
-        my %concepttests = &Apache::loncommon::existing_gcitest_courses();
+        my %concepttests = &Apache::loncommon::existing_gcitest_courses('cc');
         my $managetesturl = '/adm/menu';
         my $createtesturl = '/adm/requestcourse';
         if (($env{'request.course.id'}) &&