|
version 1.28, 2004/11/19 19:44:39
|
version 1.29, 2004/12/06 16:53:39
|
|
Line 892 sub prepare_csv_output {
|
Line 892 sub prepare_csv_output {
|
| sub compile_response_data { |
sub compile_response_data { |
| my ($response,$student,$prob,$partid,$respid) = @_; |
my ($response,$student,$prob,$partid,$respid) = @_; |
| my @rowdata; |
my @rowdata; |
| push(@rowdata,$response->[&Apache::loncoursedata::RDs_submission()]); |
push(@rowdata,&Apache::lonnet::unescape($response->[&Apache::loncoursedata::RDs_submission()])); |
| if ($ENV{'form.correctans'} eq 'true') { |
if ($ENV{'form.correctans'} eq 'true') { |
| my $correct = &Apache::lonstathelpers::get_student_answer |
my $correct = &Apache::lonstathelpers::get_student_answer |
| ($prob,$student->{'username'},$student->{'domain'}, |
($prob,$student->{'username'},$student->{'domain'}, |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonstudentsubmissions.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface / statistics