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

ng lon-capa-cvs@mail.lon-capa.org
Wed, 23 Jul 2003 18:04:52 -0000


ng		Wed Jul 23 14:04:52 2003 EDT

  Modified files:              
    /loncom/homework	grades.pm 
  Log:
  fix bug 1977 - remove ability to select the student status on the list of
  students if coming from grading page - this assumes that you are happy with
  the original choice.
  The ability to select the student status remains if viewing the list of
  students when clicking on the SUBM button on homework page.
  
  
  
Index: loncom/homework/grades.pm
diff -u loncom/homework/grades.pm:1.123 loncom/homework/grades.pm:1.124
--- loncom/homework/grades.pm:1.123	Wed Jul 23 13:33:59 2003
+++ loncom/homework/grades.pm	Wed Jul 23 14:04:51 2003
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # The LON-CAPA Grading handler
 #
-# $Id: grades.pm,v 1.123 2003/07/23 17:33:59 ng Exp $
+# $Id: grades.pm,v 1.124 2003/07/23 18:04:51 ng Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -515,8 +515,12 @@
 	'<input type="hidden" name="symb" value="'.$symb.'" />'."\n".
 	'<input type="hidden" name="saveStatusOld" value="'.$saveStatus.'" />'."\n";
 
-    $gradeTable.='<b>Student Status:</b> '.
-	&Apache::lonhtmlcommon::StatusOptions($saveStatus,undef,1,'javascript:reLoadList(this.form);').'<br />';
+    if (exists($ENV{'form.gradingMenu'}) && exists($ENV{'form.Status'})) {
+	$gradeTable.='<input type="hidden" name="Status"   value="'.$ENV{'form.Status'}.'" />'."\n";
+    } else {
+	$gradeTable.='<b>Student Status:</b> '.
+	    &Apache::lonhtmlcommon::StatusOptions($saveStatus,undef,1,'javascript:reLoadList(this.form);').'<br />';
+    }
 
     $gradeTable.='To '.lc($viewgrade).' a submission, click on the check box next to the student\'s name. Then '."\n".
 	'click on the '.$viewgrade.' button. To view the submissions for a group of students, click'."\n".
@@ -3474,6 +3478,7 @@
 	'<input type="hidden" name="probTitle"   value="'.$probTitle.'" />'."\n".
 	'<input type="hidden" name="command"     value="" />'."\n".
 	'<input type="hidden" name="saveState"   value="" />'."\n".
+	'<input type="hidden" name="gradingMenu" value="1" />'."\n".
 	'<input type="hidden" name="showgrading" value="yes" />'."\n";
 
     $result.='<table width="100%" border=0><tr><td bgcolor=#777777>'."\n".