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

albertel lon-capa-cvs-allow@mail.lon-capa.org
Fri, 26 Oct 2007 20:18:44 -0000


albertel		Fri Oct 26 16:18:44 2007 EDT

  Modified files:              
    /loncom/interface	loncommon.pm 
    /loncom/homework	grades.pm 
  Log:
  - Some more of BUG#5360 move the checked info to be near the actual submissions
  
  
Index: loncom/interface/loncommon.pm
diff -u loncom/interface/loncommon.pm:1.597 loncom/interface/loncommon.pm:1.598
--- loncom/interface/loncommon.pm:1.597	Thu Oct 25 20:40:54 2007
+++ loncom/interface/loncommon.pm	Fri Oct 26 16:18:00 2007
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # a pile of common routines
 #
-# $Id: loncommon.pm,v 1.597 2007/10/26 00:40:54 albertel Exp $
+# $Id: loncommon.pm,v 1.598 2007/10/26 20:18:00 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -5044,6 +5044,12 @@
   width: 99%;
   background: #FFFFFF;
 }
+span.LC_grade_check_note {
+  font: normal medium $sans;
+  display: inline;
+  position: absolute;
+  right: 1em;
+}
 
 END
 }
Index: loncom/homework/grades.pm
diff -u loncom/homework/grades.pm:1.468 loncom/homework/grades.pm:1.469
--- loncom/homework/grades.pm:1.468	Thu Oct 25 20:41:31 2007
+++ loncom/homework/grades.pm	Fri Oct 26 16:18:43 2007
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # The LON-CAPA Grading handler
 #
-# $Id: grades.pm,v 1.468 2007/10/26 00:41:31 albertel Exp $
+# $Id: grades.pm,v 1.469 2007/10/26 20:18:43 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1852,12 +1852,6 @@
 	$request->print('<h3>&nbsp;<span class="LC_info">Submission Record</span></h3>'."\n".
 			'<h4>&nbsp;<b>Resource: </b>'.$env{'form.probTitle'}.'</h4>'."\n");
 
-	if ($env{'form.handgrade'} eq 'no') {
-	    my $checkMark='<br /><br />&nbsp;<b>Note:</b> Part(s) graded correct by the computer is marked with a '.
-		$checkIcon.' symbol.'."\n";
-	    $request->print($checkMark);
-	}
-
 	# option to display problem, only once else it cause problems 
         # with the form later since the problem has a form.
 	if ($env{'form.vProb'} eq 'yes' or $env{'form.vAns'} eq 'yes') {
@@ -1989,6 +1983,13 @@
     $result.= &mt('Submissions');
     $result.='<input type="hidden" name="name'.$counter.
 	'" value="'.$env{'form.fullname'}.'" />'."\n";
+    if ($env{'form.handgrade'} eq 'no') {
+	$result.='<span class="LC_grade_check_note">'.
+	    &mt('Part(s) graded correct by the computer is marked with a [_1] symbol.',$checkIcon)."</span>\n";
+
+    }
+
+
 
     # If any part of the problem is an essay-response (handgraded), then check for collaborators
     my $fullname;