Diff for /loncom/interface/statistics/lonsubmissiontimeanalysis.pm between versions 1.25 and 1.26

version 1.25, 2006/05/01 19:29:13 version 1.26, 2006/05/05 20:03:43
Line 174  sub analyze_times { Line 174  sub analyze_times {
     # Get the data      # Get the data
     my $SubData = &Apache::loncoursedata::get_response_time_data      my $SubData = &Apache::loncoursedata::get_response_time_data
         ([&Apache::lonstatistics::get_selected_sections()],          ([&Apache::lonstatistics::get_selected_sections()],
            [&Apache::lonstatistics::get_selected_groups()],
          $Apache::lonstatistics::enrollment_status,           $Apache::lonstatistics::enrollment_status,
          $symb,$part);           $symb,$part);
     if (! defined($SubData) || ! ref($SubData)) {      if (! defined($SubData) || ! ref($SubData)) {
Line 400  sub CreateInterface { Line 401  sub CreateInterface {
     $Str .= '<table cellspacing="5">'."\n";      $Str .= '<table cellspacing="5">'."\n";
     $Str .= '<tr>';      $Str .= '<tr>';
     $Str .= '<th align="center">'.&mt('Sections').'</th>';      $Str .= '<th align="center">'.&mt('Sections').'</th>';
       $Str .= '<th align="center">'.&mt('Groups').'</th>';
     $Str .= '<th align="center">'.&mt('Enrollment Status').'</th>';      $Str .= '<th align="center">'.&mt('Enrollment Status').'</th>';
     $Str .= '</tr>'."\n";      $Str .= '</tr>'."\n";
     ##      ##
Line 408  sub CreateInterface { Line 410  sub CreateInterface {
     $Str .= &Apache::lonstatistics::SectionSelect('Section','multiple',4);      $Str .= &Apache::lonstatistics::SectionSelect('Section','multiple',4);
     $Str .= '</td>';      $Str .= '</td>';
     #      #
       $Str .= '<td align="center">'."\n";
       $Str .= &Apache::lonstatistics::GroupSelect('Group','multiple',4);
       $Str .= '</td>';
       #
     $Str .= '<td align="center">';      $Str .= '<td align="center">';
     $Str .= &Apache::lonhtmlcommon::StatusOptions(undef,undef,4);      $Str .= &Apache::lonhtmlcommon::StatusOptions(undef,undef,4);
     $Str .= '</td>';      $Str .= '</td>';

Removed from v.1.25  
changed lines
  Added in v.1.26


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>