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

Diff for /loncom/interface/lonuserutils.pm between versions 1.22 and 1.26

version 1.22, 2007/12/22 00:39:52 version 1.26, 2007/12/22 04:58:45
Line 738  sub print_upload_manager_footer { Line 738  sub print_upload_manager_footer {
     }      }
     if ($context eq 'author') {      if ($context eq 'author') {
         $Str .= '<h3>'.&mt('Default role')."</h3>\n".          $Str .= '<h3>'.&mt('Default role')."</h3>\n".
                 &mt('Choose the role to assign to users without one specified in the uploaded file');                  &mt('Choose the role to assign to users without a value specified in the uploaded file');
     } elsif ($context eq 'course') {      } elsif ($context eq 'course') {
         $Str .= '<h3>'.&mt('Default role and section')."</h3>\n".          $Str .= '<h3>'.&mt('Default role and section')."</h3>\n".
                 &mt('Choose the role and/or section to assign to users without one specified in the uploaded file');                  &mt('Choose the role and/or section(s) to assign to users without values specified in the uploaded file');
     } else {      } else {
         $Str .= '<br /><br /><b>'.&mt('Default role and/or section')."</b><br />\n".          $Str .= '<br /><br /><b>'.&mt('Default role and/or section(s)')."</b><br />\n".
                 &mt('Role and/or section for users without one in the uploaded file.');                  &mt('Role and/or section(s) for users without values specified in the uploaded file.');
     }      }
     $Str .= '<br />';      $Str .= '<br />';
     if (($context eq 'domain') || ($context eq 'author')) {      if (($context eq 'domain') || ($context eq 'author')) {
Line 786  sub forceid_change { Line 786  sub forceid_change {
         "<p>\n".'<label><input type="checkbox" name="forceid" value="yes">'.          "<p>\n".'<label><input type="checkbox" name="forceid" value="yes">'.
         &mt('Disable ID/Student Number Safeguard and Force Change '.          &mt('Disable ID/Student Number Safeguard and Force Change '.
         'of Conflicting IDs').'</label><br />'."\n".          'of Conflicting IDs').'</label><br />'."\n".
         &mt('(only do if you know what you are doing.)')."</br><br />\n";          &mt('(only do if you know what you are doing.)')."\n";
     if ($context eq 'domain') {      if ($context eq 'domain') {
         $output .= '<label><input type="checkbox" name="recurseid"'.          $output .= '<br /><label><input type="checkbox" name="recurseid"'.
                    ' value="yes">'.                      ' value="yes">'. 
   &mt('Update ID/Student Number in courses in which user is Active/Future student,<br />(if forcing change).').    &mt('Update ID/Student Number in courses in which user is Active/Future student,<br />(if forcing change).').
                    '</label></p>'."\n";                     '</label>'."\n";
     }      }
       $output .= '</p>';
     return $output;      return $output;
 }  }
   
Line 962  sub date_setting_table { Line 963  sub date_setting_table {
             ($env{'form.action'} eq 'upload')) {              ($env{'form.action'} eq 'upload')) {
             if ($env{'request.course.sec'} eq '') {              if ($env{'request.course.sec'} eq '') {
                 $dateDefault = '<span class="LC_nobreak">'.                  $dateDefault = '<span class="LC_nobreak">'.
                     '<label><input type="checkbox" name="makedatesdefault" /> '.                      '<label><input type="checkbox" name="makedatesdefault" value="1" /> '.
                     &mt('make these dates the default access dates for future student enrollment').                      &mt('make these dates the default access dates for future student enrollment').
                     '</label></span>';                      '</label></span>';
             }              }
Line 1001  sub make_dates_default { Line 1002  sub make_dates_default {
                 {'default_enrollment_start_date'=>$startdate,                  {'default_enrollment_start_date'=>$startdate,
                  'default_enrollment_end_date'  =>$enddate},$cdom,$cnum);                   'default_enrollment_end_date'  =>$enddate},$cdom,$cnum);
         if ($put_result eq 'ok') {          if ($put_result eq 'ok') {
             $result .= &mt('Set default start and end dates for course').              $result .= &mt('Set default start and end access dates for course.').
                        '<br />'."\n";                         '<br />'."\n";
             #              #
             # Refresh the course environment              # Refresh the course environment
             &Apache::lonnet::coursedescription($env{'request.course.id'},              &Apache::lonnet::coursedescription($env{'request.course.id'},
                                                {'freshen_cache' => 1});                                                 {'freshen_cache' => 1});
         } else {          } else {
             $result .= &mt('Unable to set default dates for course').":".$put_result.              $result .= &mt('Unable to set default access dates for course.').":".$put_result.
                        '<br />';                         '<br />';
         }          }
     }      }
Line 1289  sub print_userlist { Line 1290  sub print_userlist {
         $r->print('<label>'.&mt('Role: [_1]',$role_select).'</label>');          $r->print('<label>'.&mt('Role: [_1]',$role_select).'</label>');
     }      }
     if (!(($context eq 'domain') && ($env{'form.roletype'} eq 'course'))) {      if (!(($context eq 'domain') && ($env{'form.roletype'} eq 'course'))) {
         $r->print(&list_submit_button(&mt('Update Display'))."\n</p>\n");          $r->print('&nbsp;'.&list_submit_button(&mt('Update Display')).
                     "\n</p>\n");
     }      }
     my ($indexhash,$keylist) = &make_keylist_array();      my ($indexhash,$keylist) = &make_keylist_array();
     my (%userlist,%userinfo);      my (%userlist,%userinfo);
Line 1479  sub gather_userinfo { Line 1481  sub gather_userinfo {
             ($userdata{'username'},$userdata{'domain'},$userdata{'role'}) =              ($userdata{'username'},$userdata{'domain'},$userdata{'role'}) =
                 split(/:/,$item);                  split(/:/,$item);
             ($userdata{'start'},$userdata{'end'})=split(/:/,$rolehash->{$item});              ($userdata{'start'},$userdata{'end'})=split(/:/,$rolehash->{$item});
             &build_user_record(\%userdata,$userinfo,$indexhash,$item,$userlist);              &build_user_record($context,\%userdata,$userinfo,$indexhash,
                                  $item,$userlist);
         } elsif ($context eq 'course') {          } elsif ($context eq 'course') {
             my $viewablesec = &viewable_section($permission);              my $viewablesec = &viewable_section($permission);
             ($userdata{'username'},$userdata{'domain'},$userdata{'role'},              ($userdata{'username'},$userdata{'domain'},$userdata{'role'},
Line 1488  sub gather_userinfo { Line 1491  sub gather_userinfo {
             if (($viewablesec ne '') && ($userdata{'section'} ne '')) {              if (($viewablesec ne '') && ($userdata{'section'} ne '')) {
                 next if ($viewablesec ne $userdata{'section'});                  next if ($viewablesec ne $userdata{'section'});
             }              }
             &build_user_record(\%userdata,$userinfo,$indexhash,$item,$userlist);              &build_user_record($context,\%userdata,$userinfo,$indexhash,
                                  $item,$userlist);
         } elsif ($context eq 'domain') {          } elsif ($context eq 'domain') {
             if ($env{'form.roletype'} eq 'domain') {              if ($env{'form.roletype'} eq 'domain') {
                 ($userdata{'role'},$userdata{'username'},$userdata{'domain'}) =                  ($userdata{'role'},$userdata{'username'},$userdata{'domain'}) =
                     split(/:/,$item);                      split(/:/,$item);
                 ($userdata{'end'},$userdata{'start'})=split(/:/,$rolehash->{$item});                  ($userdata{'end'},$userdata{'start'})=split(/:/,$rolehash->{$item});
                 &build_user_record(\%userdata,$userinfo,$indexhash,$item,$userlist);                  &build_user_record($context,\%userdata,$userinfo,$indexhash,
                                      $item,$userlist);
             } elsif ($env{'form.roletype'} eq 'author') {              } elsif ($env{'form.roletype'} eq 'author') {
                 if (ref($rolehash->{$item}) eq 'HASH') {                  if (ref($rolehash->{$item}) eq 'HASH') {
                     $userdata{'extent'} = $item;                      $userdata{'extent'} = $item;
Line 1503  sub gather_userinfo { Line 1508  sub gather_userinfo {
                         ($userdata{'start'},$userdata{'end'}) =                           ($userdata{'start'},$userdata{'end'}) = 
                             split(/:/,$rolehash->{$item}{$key});                              split(/:/,$rolehash->{$item}{$key});
                         my $uniqid = $key.':'.$item;                          my $uniqid = $key.':'.$item;
                         &build_user_record(\%userdata,$userinfo,$indexhash,$uniqid,$userlist);                          &build_user_record($context,\%userdata,$userinfo,
                                              $indexhash,$uniqid,$userlist);
                     }                      }
                 }                  }
             } elsif ($env{'form.roletype'} eq 'course') {              } elsif ($env{'form.roletype'} eq 'course') {
Line 1518  sub gather_userinfo { Line 1524  sub gather_userinfo {
                             my $space = ', ';                              my $space = ', ';
                             if ($format eq 'html' || $format eq 'view') {                              if ($format eq 'html' || $format eq 'view') {
                                 $spanstart = '<span class="LC_nobreak">';                                  $spanstart = '<span class="LC_nobreak">';
                                 if ($permission->{'cusr'}) {                                  # FIXME: actions on courses disabled for now
                                     if ($numcids > 1) {  #                                if ($permission->{'cusr'}) {
                                         $spanstart .= '<input type="radio" name="'.$item.'" value="'.$cid.'" &nbsp; />';  #                                    if ($numcids > 1) {
                                     } else {  #                                        $spanstart .= '<input type="radio" name="'.$item.'" value="'.$cid.'" />&nbsp;';
                                         $spanstart .= '<input type="hidden" name="'.$item.'" value="'.$cid.'" &nbsp; />';  #                                    } else {
                                     }  #                                        $spanstart .= '<input type="hidden" name="'.$item.'" value="'.$cid.'" />&nbsp;';
                                 }  #                                    }
   #                                }
                                 $spanend = '</span><br />';                                  $spanend = '</span><br />';
                                 $space = ',&nbsp;';                                  $space = ',&nbsp;';
                             }                              }
Line 1532  sub gather_userinfo { Line 1539  sub gather_userinfo {
                                     $rolehash->{$item}{$cid}{'desc'}.$space;                                      $rolehash->{$item}{$cid}{'desc'}.$space;
                             if (ref($rolehash->{$item}{$cid}{'secs'}) eq 'HASH') {                               if (ref($rolehash->{$item}{$cid}{'secs'}) eq 'HASH') { 
                                 foreach my $sec (sort(keys(%{$rolehash->{$item}{$cid}{'secs'}}))) {                                  foreach my $sec (sort(keys(%{$rolehash->{$item}{$cid}{'secs'}}))) {
                                     $userdata{'extent'} .= $sec.$space.$rolehash->{$item}{$cid}{'secs'}{$sec}.$spanend;                                      if (($env{'form.Status'} eq 'Any') ||
                                           ($env{'form.Status'} eq $rolehash->{$item}{$cid}{'secs'}{$sec})) {
                                           $userdata{'extent'} .= $sec.$space.$rolehash->{$item}{$cid}{'secs'}{$sec}.$spanend;
                                           $userdata{'status'} = $rolehash->{$item}{$cid}{'secs'}{$sec};
                                       }
                                 }                                  }
                             }                              }
                         }                          }
                     }                      }
                 }                  }
                 &build_user_record(\%userdata,$userinfo,$indexhash,$item,$userlist);                  if ($userdata{'status'} ne '') {
                       &build_user_record($context,\%userdata,$userinfo,
                                          $indexhash,$item,$userlist);
                   }
             }              }
         }          }
     }      }
Line 1546  sub gather_userinfo { Line 1560  sub gather_userinfo {
 }  }
   
 sub build_user_record {  sub build_user_record {
     my ($userdata,$userinfo,$indexhash,$record_key,$userlist) = @_;      my ($context,$userdata,$userinfo,$indexhash,$record_key,$userlist) = @_;
     next if ($userdata->{'start'} eq '-1' && $userdata->{'end'} eq '-1');      next if ($userdata->{'start'} eq '-1' && $userdata->{'end'} eq '-1');
     &process_date_info($userdata);      if (!(($context eq 'domain') && ($env{'form.roletype'} eq 'course'))) {
           &process_date_info($userdata);
       }
     my $username = $userdata->{'username'};      my $username = $userdata->{'username'};
     my $domain = $userdata->{'domain'};      my $domain = $userdata->{'domain'};
     if (ref($userinfo->{$username.':'.$domain}) eq 'HASH') {      if (ref($userinfo->{$username.':'.$domain}) eq 'HASH') {
         $userdata->{'fullname'} =          $userdata->{'fullname'} = $userinfo->{$username.':'.$domain}{'fullname'};
         $userinfo->{$username.':'.$domain}{'fullname'};  
         $userdata->{'id'} = $userinfo->{$username.':'.$domain}{'id'};          $userdata->{'id'} = $userinfo->{$username.':'.$domain}{'id'};
     } else {      } else {
         &aggregate_user_info($domain,$username,$userinfo);          &aggregate_user_info($domain,$username,$userinfo);
Line 1843  END Line 1858  END
     if ($mode ne 'autoenroll') {      if ($mode ne 'autoenroll') {
         my $check_uncheck_js = &Apache::loncommon::check_uncheck_jscript();          my $check_uncheck_js = &Apache::loncommon::check_uncheck_jscript();
         my $alert = &mt("You must select at least one user by checking a user's 'Select' checkbox");          my $alert = &mt("You must select at least one user by checking a user's 'Select' checkbox");
         my $singconfirm = &mt(' for a single user');          my $singconfirm = &mt(' for a single user?');
         my $multconfirm = &mt(' for multiple users');          my $multconfirm = &mt(' for multiple users?');
         my $date_sec_selector = &date_section_javascript($context,$setting,$statusmode);           my $date_sec_selector = &date_section_javascript($context,$setting,$statusmode); 
         $r->print(<<END);          $r->print(<<END);
   
Line 1972  END Line 1987  END
     my $results_description;      my $results_description;
     if ($mode ne 'autoenroll') {      if ($mode ne 'autoenroll') {
         $results_description = &results_header_row($rolefilter,$statusmode,          $results_description = &results_header_row($rolefilter,$statusmode,
                                                    $context,$permission);                                                     $context,$permission,$mode);
         $r->print('<b>'.$results_description.'</b><br />');          $r->print('<b>'.$results_description.'</b><br />');
     }      }
     my ($output,$actionselect);      my ($output,$actionselect,%canchange,%canchangesec);
     if ($mode eq 'html' || $mode eq 'view' || $mode eq 'autoenroll') {      if ($mode eq 'html' || $mode eq 'view' || $mode eq 'autoenroll') {
         if ($mode ne 'autoenroll') {          if ($mode ne 'autoenroll') {
             if ($permission->{'cusr'}) {              if ($permission->{'cusr'}) {
Line 2014  $lt{'ac'}:&nbsp;$actionselect <input typ Line 2029  $lt{'ac'}:&nbsp;$actionselect <input typ
 <p><input type="button" value="$lt{'ca'}" onclick="javascript:checkAll(document.studentform.actionlist)" /> &nbsp;  <p><input type="button" value="$lt{'ca'}" onclick="javascript:checkAll(document.studentform.actionlist)" /> &nbsp;
 <input type="button" value="$lt{'ua'}" onclick="javascript:uncheckAll(document.studentform.actionlist)" />  <input type="button" value="$lt{'ua'}" onclick="javascript:uncheckAll(document.studentform.actionlist)" />
 END  END
                   my @allroles;
                   if ($env{'form.showrole'} eq 'Any') {
                       my $custom = 1;
                       if ($context eq 'domain') {
                           @allroles = &roles_by_context($setting,$custom);
                       } else {
                           @allroles = &roles_by_context($context,$custom);
                       }
                   } else {
                       @allroles = ($env{'form.showrole'});
                   }
                   foreach my $role (@allroles) {
                       if ($context eq 'domain') {
                           if ($setting eq 'domain') {
                               if (&Apache::lonnet::allowed('c'.$role,
                                       $env{'request.role.domain'})) {
                                   $canchange{$role} = 1;
                               }
                           }
                       } elsif ($context eq 'author') {
                           if (&Apache::lonnet::allowed('c'.$role,
                               $env{'user.domain'}.'/'.$env{'user.name'})) {
                               $canchange{$role} = 1;
                           }
                       } elsif ($context eq 'course') {
                           if (&Apache::lonnet::allowed('c'.$role,$env{'request.course.id'})) {
                               $canchange{$role} = 1;
                           } elsif ($env{'request.course.sec'} ne '') {
                               if (&Apache::lonnet::allowed('c'.$role,$env{'request.course.id'}.'/'.$env{'request.course.sec'})) {
                                   $canchangesec{$role} = $env{'request.course.sec'};
                               }
                           }
                       }
                   }
             }              }
         }          }
         $output .= "\n<p>\n".          $output .= "\n<p>\n".
Line 2227  END Line 2276  END
                 $r->print("<td>$rowcount</td>\n");                  $r->print("<td>$rowcount</td>\n");
                 $checkval;                  $checkval;
                 if ($actionselect) {                  if ($actionselect) {
                     $checkval = $user;                       my $showcheckbox;
                     if ($context eq 'course') {                      if ($role =~ /^cr\//) {
                         if ($role eq 'st') {                          $showcheckbox = $canchange{'cr'};
                             $checkval .= ':st';                      } else {
                           $showcheckbox = $canchange{$role};
                       }
                       if (!$showcheckbox) {
                           if ($context eq 'course') {
                               if ($canchangesec{$role} ne '') {
                                   if ($canchangesec{$role} eq $in{'section'}) {
                                       $showcheckbox = 1;
                                   }
                               }
                         }                          }
                         $checkval .= ':'.$in{'section'};                      }
                         if ($role eq 'st') {                      if ($showcheckbox) {
                             $checkval .= ':'.$in{'type'}.':'.$in{'lockedtype'};                          $checkval = $user; 
                           if ($context eq 'course') {
                               if ($role eq 'st') {
                                   $checkval .= ':st';
                               }
                               $checkval .= ':'.$in{'section'};
                               if ($role eq 'st') {
                                   $checkval .= ':'.$in{'type'}.':'.
                                                $in{'lockedtype'};
                               }
                         }                          }
                           $r->print('<td><input type="checkbox" name="'.
                                     'actionlist" value="'.$checkval.'"></td>');
                       } else {
                           $r->print('<td>&nbsp;</td>');
                     }                      }
                     $r->print('<td><input type="checkbox" name="actionlist" value="'.  
                               $checkval.'"></td>');  
                 }                  }
             }              }
             foreach my $item (@cols) {              foreach my $item (@cols) {
Line 2367  sub select_actions { Line 2436  sub select_actions {
                 chgsec   => "Change section associated with user roles",                  chgsec   => "Change section associated with user roles",
     );      );
     my ($output,$options,%choices);      my ($output,$options,%choices);
       # FIXME Disable actions for now for roletype=course in domain context
       if ($context eq 'domain' && $setting eq 'course') {
           return;
       }
       if ($context eq 'course') {
           if ($env{'form.showrole'} ne 'Any') {
                if (!&Apache::lonnet::allowed('c'.$env{'form.showrole'},
                                              $env{'request.course.id'})) {
                    if ($env{'request.course.sec'} eq '') {
                        return;
                    } else {
                        if (!&Apache::lonnet::allowed('c'.$env{'form.showrole'},$env{'request.course.id'}.'/'.$env{'request.course.sec'})) {
                            return;
                        }
                    }
               }
           }
       }
     if ($statusmode eq 'Any') {      if ($statusmode eq 'Any') {
         $options .= '          $options .= '
 <option value="chgdates">'.$lt{'chgdates'}.'</option>';  <option value="chgdates">'.$lt{'chgdates'}.'</option>';
Line 2393  sub select_actions { Line 2480  sub select_actions {
 <option value="delete">'.$lt{'delete'}.'</option>';  <option value="delete">'.$lt{'delete'}.'</option>';
     }      }
     if (($context eq 'course') || ($context eq 'domain' && $setting eq 'course')) {      if (($context eq 'course') || ($context eq 'domain' && $setting eq 'course')) {
         if ($statusmode ne 'Expired') {          if (($statusmode ne 'Expired') && ($env{'request.course.sec'} eq '')) {
             $options .= '              $options .= '
 <option value="chgsec">'.$lt{'chgsec'}.'</option>';  <option value="chgsec">'.$lt{'chgsec'}.'</option>';
             $choices{'sections'} = 1;              $choices{'sections'} = 1;
Line 2500  END Line 2587  END
             if (($env{'form.bulkaction'} eq 'reenable') ||               if (($env{'form.bulkaction'} eq 'reenable') || 
                 ($env{'form.bulkaction'} eq 'activate') ||                   ($env{'form.bulkaction'} eq 'activate') || 
                 ($env{'form.bulkaction'} eq 'chgdates')) {                  ($env{'form.bulkaction'} eq 'chgdates')) {
                 $output .= <<"END";                  if ($env{'request.course.sec'} eq '') {
                       $output .= <<"END";
     
         if (formname.makedatesdefault.checked == true) {          if (formname.makedatesdefault.checked == true) {
             opener.document.$callingform.makedatesdefault.value = 1;              opener.document.$callingform.makedatesdefault.value = 1;
Line 2510  END Line 2598  END
         }          }
   
 END  END
                   }
             }              }
         }          }
         $output .= <<"END";          $output .= <<"END";
Line 2559  END Line 2648  END
                 $date_items;                  $date_items;
     if ($context eq 'course' && $env{'form.bulkaction'} eq 'chgsec') {      if ($context eq 'course' && $env{'form.bulkaction'} eq 'chgsec') {
         my ($cnum,$cdom) = &get_course_identity();          my ($cnum,$cdom) = &get_course_identity();
         my %sections_count =  
             &Apache::loncommon::get_sections($cdom,$cnum);  
         my $info;          my $info;
         if ($env{'form.showrole'} eq 'st') {          if ($env{'form.showrole'} eq 'st') {
             $output .= '<p>'.$lt{'fors'}.'</p>';               $output .= '<p>'.$lt{'fors'}.'</p>'; 
         } elsif ($env{'form.shorole'} eq 'Any') {          } elsif ($env{'form.showrole'} eq 'Any') {
             $output .= '<p>'.$lt{'fors'}.'</p>'.              $output .= '<p>'.$lt{'fors'}.'</p>'.
                        '<p>'.$lt{'forn'}.'&nbsp;';                         '<p>'.$lt{'forn'}.'&nbsp;';
             $info = $lt{'reta'};              $info = $lt{'reta'};
Line 2585  END Line 2672  END
         } else {          } else {
             $info = '<input type="hidden" name="retainsec" value="0" />';               $info = '<input type="hidden" name="retainsec" value="0" />'; 
         }          }
         my $sections_select .= &course_sections(\%sections_count,$env{'form.showrole'});  
         my $rowtitle = &mt('New section to assign');          my $rowtitle = &mt('New section to assign');
         my $secbox = &section_picker($cdom,$cnum,$env{'form.showrole'},$rowtitle,$permission,$context);          my $secbox = &section_picker($cdom,$cnum,$env{'form.showrole'},$rowtitle,$permission,$context);
         $output .= $info.$secbox;          $output .= $info.$secbox;
Line 2628  sub section_picker { Line 2714  sub section_picker {
 }  }
   
 sub results_header_row {  sub results_header_row {
     my ($rolefilter,$statusmode,$context,$permission) = @_;      my ($rolefilter,$statusmode,$context,$permission,$mode) = @_;
     my ($description,$showfilter);      my ($description,$showfilter);
     if ($rolefilter ne 'Any') {      if ($rolefilter ne 'Any') {
         $showfilter = $rolefilter;          $showfilter = $rolefilter;
     }      }
     if ($context eq 'course') {      if ($context eq 'course') {
         $description = &mt('Course - ').$env{'course.'.$env{'request.course.id'}.'.description'}.': ';          if ($mode eq 'csv' || $mode eq 'excel') {
               $description = &mt('Course - ').$env{'course.'.$env{'request.course.id'}.'.description'}.': ';
           }
         if ($statusmode eq 'Expired') {          if ($statusmode eq 'Expired') {
             $description .= &mt('Users in course with expired [_1] roles',$showfilter);              $description .= &mt('Users in course with expired [_1] roles',$showfilter);
         } elsif ($statusmode eq 'Future') {          } elsif ($statusmode eq 'Future') {
Line 2648  sub results_header_row { Line 2736  sub results_header_row {
                 $description .= &mt('All users in course with [_1] roles',$rolefilter);                  $description .= &mt('All users in course with [_1] roles',$rolefilter);
             }              }
         }          }
         if (exists($permission->{'view_section'})) {          my $viewablesec = &viewable_section($permission);
           if ($viewablesec ne '') {
             if ($env{'form.showrole'} eq 'st') {              if ($env{'form.showrole'} eq 'st') {
                 $description .= ' '.&mt('(section [_1] only)',$permission->{'view_section'});                  $description .= ' '.&mt('(section [_1] only)',$viewablesec);
             } elsif ($env{'form.showrole'} eq 'any') {              } elsif ($env{'form.showrole'} ne 'cc') {
                 $description .= ' '.&mt('(section [_1] only)',$permission->{'view_section'});                  $description .= ' '.&mt('(only users affiliated with no section or section [_1])',$viewablesec);
             }              }
         }          }
     } elsif ($context eq 'author') {      } elsif ($context eq 'author') {
Removed from v.1.22  
changed lines
  Added in v.1.26

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