--- loncom/homework/grades.pm 2014/08/25 20:23:01 1.724 +++ loncom/homework/grades.pm 2014/08/25 22:12:58 1.725 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # The LON-CAPA Grading handler # -# $Id: grades.pm,v 1.724 2014/08/25 20:23:01 raeburn Exp $ +# $Id: grades.pm,v 1.725 2014/08/25 22:12:58 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -2553,7 +2553,6 @@ sub get_last_submission { } my ($partid,$foo) = split(/submission$/,$key); my $draft = $lasthash{$partid.'awarddetail'} eq 'DRAFT' ? 1 : 0; - #push(@string, join(':', $key, $hide, $draft.$lasthash{$key})); push(@string, join(':', $key, $hide, $draft, ( ref($lasthash{$key}) eq 'ARRAY' ? join(',', @{$lasthash{$key}}) : $lasthash{$key}) ));