[LON-CAPA-cvs] cvs: loncom(GCI_3) /homework grades.pm

[raeburn]

raeburn		Wed Jan  6 18:43:58 2010 EDT

  Modified files:              (Branch: GCI_3)
    /loncom/homework	grades.pm 
  Log:
  - Customization for GCI_3.
    - Block CC access to individual student submission data via 
      grading screens in gcitest courses.
  
  
Index: loncom/homework/grades.pm
diff -u loncom/homework/grades.pm:1.581 loncom/homework/grades.pm:1.581.2.1
--- loncom/homework/grades.pm:1.581	Sat Nov 21 16:41:41 2009
+++ loncom/homework/grades.pm	Wed Jan  6 18:43:57 2010
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # The LON-CAPA Grading handler
 #
-# $Id: grades.pm,v 1.581 2009/11/21 16:41:41 www Exp $
+# $Id: grades.pm,v 1.581.2.1 2010/01/06 18:43:57 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -9116,6 +9116,11 @@
     my $brcrum = [{href=>"/adm/grades",text=>"Grading"}];
     $request->print(&Apache::loncommon::start_page('Grading',undef,
                                           {'bread_crumbs' => $brcrum}));
+    if (&Apache::loncommon::needs_gci_custom()) {
+        $request->print('<h3>'.&mt('Grading screens are unavailable for GCI Concept Tests').'</h3>'.&Apache::loncommon::end_page());
+        &reset_caches();
+        return '';
+    }
     if ($symb eq '' && $command eq '') {
 	if ($env{'user.adv'}) {
 	    if (($env{'form.codeone'}) && ($env{'form.codetwo'}) &&