[BACK]Return to lonstatistics.pm CVS log [TXT] [DIR] Up to [LON-CAPA] / loncom / interface

Diff for /loncom/interface/lonstatistics.pm between versions 1.130 and 1.132

version 1.130, 2006/05/01 05:39:44 version 1.132, 2006/05/01 19:37:34
Line 281  sub PrepareClasslist { Line 281  sub PrepareClasslist {
                   ($enrollment_status eq 'Any'))                     ($enrollment_status eq 'Any')) 
                  ){                   ){
                 my $groupcheck = 0;                  my $groupcheck = 0;
                 if (grep/^all$/,@selected_groups) {                  if (grep(/^all$/,@selected_groups)) {
                     push (@Students,$studenthash);                      push(@Students,$studenthash);
                     last;                      last;
                 } elsif (grep/^none$/,@selected_groups) {                  } elsif (grep(/^none$/,@selected_groups)) {
                     if ($studenthash->{'groups'} eq 'none') {                      if ($studenthash->{'groups'} eq 'none') {
                         push (@Students,$studenthash);                          push(@Students,$studenthash);
                         last;                          last;
                     }                           }     
                 } else {                  } else {
                     foreach my $group (@selected_groups) {                      foreach my $group (@selected_groups) {
                         if (grep/^$group$/,@studentsgroups) {                          if (grep(/^$group$/,@studentsgroups)) {
                             push (@Students,$studenthash);                              push(@Students,$studenthash);
                             $groupcheck = 1;                              $groupcheck = 1;
                             last;                              last;
                         }                          }
Line 453  sub section_and_enrollment_description { Line 453  sub section_and_enrollment_description {
         &Apache::lonnet::logthis($description);          &Apache::lonnet::logthis($description);
     }      }
     $description = &section_or_group_text($mode,'section',@sections).      $description = &section_or_group_text($mode,'section',@sections).
                    ' '.&section_or_group_text($mode,'group',@groups);   ' '.&section_or_group_text($mode,'group',@groups);
     if ($mode eq 'localized') {      if ($mode eq 'localized') {
         $description .= &mt(' [_1] enrollment status.',$env{'form.Status'});          $description .= &mt(' [_1] enrollment status.',$env{'form.Status'});
     } elsif ($mode eq 'plaintext') {      } elsif ($mode eq 'plaintext') {
Line 922  sub DisplayClasslist { Line 922  sub DisplayClasslist {
     #      #
     # Output some of the standard interface components      # Output some of the standard interface components
     my $Str;      my $Str;
     $Str .= &Apache::lonhtmlcommon::breadcrumbs(undef,'Select One Student');      $Str .= &Apache::lonhtmlcommon::breadcrumbs('Select One Student');
     $Str .= '<p><table cellspacing="5">'."\n";      $Str .= '<p><table cellspacing="5">'."\n";
     $Str .= '<tr>';      $Str .= '<tr>';
     $Str .= '<th align="center"><b>'.&mt('Sections').'</b></th>';      $Str .= '<th align="center"><b>'.&mt('Sections').'</b></th>';
Line 1163  ENDSTYLE Line 1163  ENDSTYLE
                                             bug=>'Statistics and Charts'});                                              bug=>'Statistics and Charts'});
     if (! exists($env{'form.reportSelected'}) ||       if (! exists($env{'form.reportSelected'}) || 
         $env{'form.reportSelected'} eq '') {          $env{'form.reportSelected'} eq '') {
         $r->print(&Apache::lonhtmlcommon::breadcrumbs          $r->print(&Apache::lonhtmlcommon::breadcrumbs('Statistics Main Page').
                   (undef,&mt('Statistics Main Page')).  
                   &CreateMainMenu());                    &CreateMainMenu());
     } else {      } else {
     #      #
Removed from v.1.130  
changed lines
  Added in v.1.132

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