[LON-CAPA-cvs] cvs: loncom(version_2_4_X) /homework grades.pm
albertel
lon-capa-cvs-allow@mail.lon-capa.org
Wed, 13 Jun 2007 17:20:13 -0000
albertel Wed Jun 13 13:20:13 2007 EDT
Modified files: (Branch: version_2_4_X)
/loncom/homework grades.pm
Log:
- backport 1.403
Index: loncom/homework/grades.pm
diff -u loncom/homework/grades.pm:1.399 loncom/homework/grades.pm:1.399.2.1
--- loncom/homework/grades.pm:1.399 Thu May 10 12:06:09 2007
+++ loncom/homework/grades.pm Wed Jun 13 13:20:12 2007
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# The LON-CAPA Grading handler
#
-# $Id: grades.pm,v 1.399 2007/05/10 16:06:09 albertel Exp $
+# $Id: grades.pm,v 1.399.2.1 2007/06/13 17:20:12 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -1959,8 +1959,8 @@
($env{'form.lastSub'} eq 'hdgrade' &&
$$handgrade{$$part[0].'_'.$$part[1]} eq 'yes')) {
my $display_part=&get_display_part($partid,$symb);
- $lastsubonly.='<tr><td bgcolor="#ffffe6">Debug -'.'<b>Part:</b> '.
- $display_part.' <span class="LC_internal_info">( hhhh ID '.$respid.
+ $lastsubonly.='<tr><td bgcolor="#ffffe6"><b>Part:</b> '.
+ $display_part.' <span class="LC_internal_info">( ID '.$respid.
' )</span> ';
my $files=&get_submitted_files($udom,$uname,$partid,$respid,\%record);
if (@$files) {