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

Diff for /loncom/interface/grouproster.pm between versions 1.6 and 1.10

version 1.6, 2008/12/06 20:31:14 version 1.10, 2016/02/26 21:44:39
Line 1 Line 1
 # The LearningOnline Network with CAPA  # The LearningOnline Network with CAPA
 #  #
 # $Id   # $Id$
 #  #
 # Copyright Michigan State University Board of Trustees  # Copyright Michigan State University Board of Trustees
 #  #
Line 33  use Apache::loncommon; Line 33  use Apache::loncommon;
 use Apache::lonhtmlcommon;  use Apache::lonhtmlcommon;
 use Apache::lonlocal;  use Apache::lonlocal;
 use Apache::longroup;  use Apache::longroup;
   use Apache::lonnavmaps;
 use LONCAPA;  use LONCAPA;
 use Apache::Constants qw(:common :http);  use Apache::Constants qw(:common :http);
 use lib '/home/httpd/lib/perl/';  use lib '/home/httpd/lib/perl/';
Line 141  sub roster_header { Line 142  sub roster_header {
     }      }
     my $args;      my $args;
     if ($env{'form.ref'} eq 'popup') {      if ($env{'form.ref'} eq 'popup') {
         $args = {           $args = { 'no_nav_bar'    => 1, };
                   'no_nav_bar'    => 1,  
                   'no_inline_link' => 1,  
                 };  
     }      }
     my $jscript = qq|      my $jscript = qq|
 function changeSort(caller) {  function changeSort(caller) {
Line 160  function changeSort(caller) { Line 158  function changeSort(caller) {
         $output .= '<h3>'.&mt('Group membership status - [_1]',$description).          $output .= '<h3>'.&mt('Group membership status - [_1]',$description).
                    '</h3>';                     '</h3>';
     } else {      } else {
         &Apache::lonhtmlcommon::add_breadcrumb          my $view_permission =
             ({href=>"/adm/$cdom/$cnum/$group/smppg?$refarg",              &Apache::lonnet::allowed('vcg',$env{'request.course.id'}.($env{'request.course.sec'}?'/'.$env{'request.course.sec'}:''));
           my $navmap=Apache::lonnavmaps::navmap->new();
           my $grouppagelink = &Apache::longroup::get_group_link($cdom,$cnum,$group,$navmap,$view_permission,$refarg);
           if ($grouppagelink) {
               &Apache::lonhtmlcommon::add_breadcrumb
               ({href=>$grouppagelink,
               text=>"$ucgpterm: $description",                text=>"$ucgpterm: $description",
               title=>"Go to group's home page"},                title=>"Go to group's home page"},);
              {href=>'/adm/grouproster?group='.$group.'&amp;'.$refarg,          } else {
               &Apache::lonhtmlcommon::add_breadcrumb
               ({text=>"$ucgpterm: $description",});
           }
           &Apache::lonhtmlcommon::add_breadcrumb
                ({href=>'/adm/grouproster?group='.$group.'&amp;'.$refarg,
               text=>"Membership Roster",                text=>"Membership Roster",
               title=>"Display group membership"},);                title=>"Display group membership"},);
         $output .= &Apache::lonhtmlcommon::breadcrumbs(&mt($gpterm.' membership status - [_1]',$description));          $output .= &Apache::lonhtmlcommon::breadcrumbs(&mt($gpterm.' membership status - [_1]',$description));
Line 350  sub members_table_row { Line 358  sub members_table_row {
             $privlist =~ s/, $//;              $privlist =~ s/, $//;
             $output .= '<td>'.$privlist.'</td>';              $output .= '<td>'.$privlist.'</td>';
         } elsif ($view_details) {          } elsif ($view_details) {
             $output .= '<td><nobr>'.join('&nbsp;&nbsp;&nbsp;',              $output .= '<td><span class="LC_nobreak">'.join('&nbsp;&nbsp;&nbsp;',
                       @{$$userinfo{'currtools'}}).'</nobr></td>';                        @{$$userinfo{'currtools'}}).'</span></td>';
         }          }
     }      }
     $output .= &Apache::loncommon::end_data_table_row();      $output .= &Apache::loncommon::end_data_table_row();
Removed from v.1.6  
changed lines
  Added in v.1.10

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