--- loncom/homework/essayresponse.pm 2006/05/30 12:45:36 1.72 +++ loncom/homework/essayresponse.pm 2006/08/01 14:04:32 1.73 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # essay (ungraded) style responses # -# $Id: essayresponse.pm,v 1.72 2006/05/30 12:45:36 www Exp $ +# $Id: essayresponse.pm,v 1.73 2006/08/01 14:04:32 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -168,7 +168,7 @@ sub file_submission { my @submitted_files = ($files); if ( $which eq 'portfiles' ) { - @submitted_files = split(/,/,$files); + @submitted_files = split(/\s*,\s*/,$files); } my $uploadedfiletypes= &Apache::lonnet::EXT("resource.$part".'_'."$id.uploadedfiletypes");