--- loncom/homework/essayresponse.pm 2010/06/21 02:15:37 1.108 +++ loncom/homework/essayresponse.pm 2010/08/22 19:00:15 1.109 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # essay (ungraded) style responses # -# $Id: essayresponse.pm,v 1.108 2010/06/21 02:15:37 raeburn Exp $ +# $Id: essayresponse.pm,v 1.109 2010/08/22 19:00:15 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -121,7 +121,7 @@ sub start_essayresponse { $result .= ''.&mt('Collaborated with [_1]',$coll).''; } - my $current_files_display = ¤t_file_submissions($part,$id); + my $current_files_display = &Apache::inputtags::current_file_submissions($part,$id); if ($current_files_display) { $result .= ''.&mt('Submitted files:').'
'. $current_files_display.'';