--- loncom/homework/grades.pm 2006/06/30 00:30:00 1.367
+++ loncom/homework/grades.pm 2006/07/02 00:51:25 1.368
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# The LON-CAPA Grading handler
#
-# $Id: grades.pm,v 1.367 2006/06/30 00:30:00 albertel Exp $
+# $Id: grades.pm,v 1.368 2006/07/02 00:51:25 banghart Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -1551,15 +1551,17 @@ sub handback_box {
next if (!@$files);
my $file_counter = 1;
foreach my $file (@$files) {
- 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";
- $result.='
';
- $file_counter++;
+ if ($file =~ /\/portfolio\//) {
+ 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";
+ $result.='
';
+ $file_counter++;
+ }
}
}
return $result;