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

[raeburn]

raeburn		Thu Sep 22 23:03:10 2011 EDT

  Modified files:              
    /loncom/homework	grades.pm 
  Log:
  - Bug 5629, 6456. Hand-back of file(s) to a student. 
  - prevent duplicated uploads in multi-part problems with non-numeric part ids.
  
  
Index: loncom/homework/grades.pm
diff -u loncom/homework/grades.pm:1.650 loncom/homework/grades.pm:1.651
--- loncom/homework/grades.pm:1.650	Sat Sep 17 19:01:20 2011
+++ loncom/homework/grades.pm	Thu Sep 22 23:03:09 2011
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # The LON-CAPA Grading handler
 #
-# $Id: grades.pm,v 1.650 2011/09/17 19:01:20 raeburn Exp $
+# $Id: grades.pm,v 1.651 2011/09/22 23:03:09 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -2864,7 +2864,7 @@
     foreach my $part_response_id (@part_response_id) {
     	my ($part_id,$resp_id) = @{ $part_response_id };
 	my $part_resp = join('_',@{ $part_response_id });
-            if (($env{'form.'.$newflg.'_'.$part_resp.'_returndoc1'}) && ($new_part == $part_id)) {
+            if (($env{'form.'.$newflg.'_'.$part_resp.'_returndoc1'}) && ($new_part eq $part_id)) {
                 # if multiple files are uploaded names will be 'returndoc2','returndoc3'
                 my $file_counter = 1;
 		my $file_msg;