--- loncom/homework/grades.pm 2006/04/03 19:00:27 1.346 +++ loncom/homework/grades.pm 2006/04/03 20:45:38 1.347 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # The LON-CAPA Grading handler # -# $Id: grades.pm,v 1.346 2006/04/03 19:00:27 banghart Exp $ +# $Id: grades.pm,v 1.347 2006/04/03 20:45:38 banghart Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1517,7 +1517,10 @@ sub handback_box { next if (!@$files); my $file_counter = 1; foreach my $file (@$files) { - my ($file_disp) = ($file =~ m|.+/(.+)$|); + my ($file_path, $file_disp) = ($file =~ m|(.+/)(.+)$|); + my ($name,$version,$ext) = &file_name_version_ext($file_disp); + $file_disp = "$name.$ext"; + $file = $file_path.$file_disp; $result.=&mt('Return commented version of [_1] to student.', ''.$file_disp.''); $result.=''."\n";