--- loncom/interface/statistics/lonsubmissiontimeanalysis.pm 2003/10/29 18:59:46 1.2 +++ loncom/interface/statistics/lonsubmissiontimeanalysis.pm 2003/10/30 16:20:18 1.3 @@ -1,6 +1,6 @@ # The LearningOnline Network with CAPA # -# $Id: lonsubmissiontimeanalysis.pm,v 1.2 2003/10/29 18:59:46 matthew Exp $ +# $Id: lonsubmissiontimeanalysis.pm,v 1.3 2003/10/30 16:20:18 matthew Exp $ # # Copyright Michigan State University Board of Trustees # @@ -261,7 +261,7 @@ sub analyze_times { sub successful_submission { my ($row) = @_; if (ref($row) eq 'ARRAY') { - return $row->[1]; + return $row->[&Apache::loncoursedata::RT_awarded()]; } return undef; return 0; @@ -270,7 +270,7 @@ sub successful_submission { sub get_time_from_row { my ($row) = @_; if (ref($row) eq 'ARRAY') { - return $row->[3]; + return $row->[&Apache::loncoursedata::RT_timestamp()]; } return undef; } @@ -278,7 +278,7 @@ sub get_time_from_row { sub get_tries_from_row { my ($row) = @_; if (ref($row) eq 'ARRAY') { - return $row->[2]; + return $row->[&Apache::loncoursedata::RT_tries()]; } return undef; }