--- loncom/homework/inputtags.pm 2006/06/29 22:57:39 1.197
+++ loncom/homework/inputtags.pm 2006/06/30 00:32:25 1.198
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# input definitons
#
-# $Id: inputtags.pm,v 1.197 2006/06/29 22:57:39 albertel Exp $
+# $Id: inputtags.pm,v 1.198 2006/06/30 00:32:25 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -720,10 +720,16 @@ sub decideoutput {
}
my (undef,undef,$domain,$user)=&Apache::lonxml::whichuser();
foreach my $resid(@Apache::inputtags::response){
- &Apache::lonnet::logthis("handback is ".$Apache::lonhomework::history{"resource.$part.$resid.handback"});
if ($Apache::lonhomework::history{"resource.$part.$resid.handback"}) {
- $message.= '
Returned File';
- }
+ $message.='
';
+ my @files = split(/\s*,\s*/,
+ $Apache::lonhomework::history{"resource.$part.$resid.handback"});
+ my $file_msg;
+ foreach my $file (@files) {
+ $file_msg.= '
'.$file.'';
+ }
+ $message .= &mt('Returned file(s): [_1]',$file_msg);
+ }
}
if (lc($Apache::lonhomework::problemstatus) eq 'no' &&