--- loncom/interface/statistics/lonstudentsubmissions.pm 2008/12/11 14:55:27 1.51 +++ loncom/interface/statistics/lonstudentsubmissions.pm 2009/04/21 13:28:23 1.54 @@ -1,6 +1,6 @@ # The LearningOnline Network with CAPA # -# $Id: lonstudentsubmissions.pm,v 1.51 2008/12/11 14:55:27 bisitz Exp $ +# $Id: lonstudentsubmissions.pm,v 1.54 2009/04/21 13:28:23 bisitz Exp $ # # Copyright Michigan State University Board of Trustees # @@ -265,7 +265,8 @@ sub prepare_html_output { $headers{'response'} .= ''. &mt('Response [_1]',$responses->[$i]).''; - $headers{'student'}.= ''.join('', + $headers{'student'}.= ''. + join('', @headers). ''; } @@ -284,7 +285,7 @@ sub prepare_html_output { $headers{'part'} .= qq{$tmpname}; $nonempty_part_headers = 1; } else { - $headers{'part'} .= qq{ }; + $headers{'part'} .= qq{ }; } $prob_span += $part_span; } @@ -1095,7 +1096,6 @@ sub CreateInterface { $Str .= ''.&mt('Sections').''; $Str .= ''.&mt('Groups').''; $Str .= ''.&mt('Access Status').''; -# $Str .= ''.&mt('Output as [_1]',$output_selector).''; $Str .= ''.&mt('Options').''; $Str .= ''.&mt('Output Format').''; $Str .= &Apache::loncommon::end_data_table_header_row(); @@ -1145,14 +1145,14 @@ sub CreateInterface { # $Str .= ''. '
'. + &mt('Show problem').' '.$prob_checkbox.'
'. '
'. + &mt('Show correct answers').' '.$ans_checkbox.'
'. '
'. '
'. ''; # @@ -1166,6 +1166,7 @@ sub CreateInterface { '') .'

'; + $Str .= '

'; ## return $Str; }