--- loncom/interface/loncoursedata.pm 2006/08/10 21:07:01 1.175 +++ loncom/interface/loncoursedata.pm 2006/10/06 19:02:20 1.176 @@ -1,6 +1,6 @@ # The LearningOnline Network with CAPA # -# $Id: loncoursedata.pm,v 1.175 2006/08/10 21:07:01 albertel Exp $ +# $Id: loncoursedata.pm,v 1.176 2006/10/06 19:02:20 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -2723,7 +2723,7 @@ sub get_response_data { if (ref($dataset) eq 'ARRAY' && scalar(@$dataset)>0) { # Clear the \'s from around the submission for (my $i =0;$i[$i]->[3] =~ s/(\'$|^\')//g; + $dataset->[$i]->[&RD_submission()] =~ s/(\'$|^\')//g; } return $dataset; } @@ -2784,7 +2784,7 @@ sub get_response_data_by_student { if (ref($dataset) eq 'ARRAY' && scalar(@$dataset)>0) { # Clear the \'s from around the submission for (my $i =0;$i[$i]->[2] =~ s/(\'$|^\')//g; + $dataset->[$i]->[&RDs_submission] =~ s/(\'$|^\')//g; } return $dataset; }