Diff for /loncom/interface/courseprefs.pm between versions 1.131 and 1.133

version 1.131, 2024/02/24 23:41:44 version 1.133, 2025/01/07 16:19:19
Line 2735  sub store_changes { Line 2735  sub store_changes {
                                             $displayname = &mt('Recipients of '.$text.' questions');                                              $displayname = &mt('Recipients of '.$text.' questions');
                                         }                                          }
                                     } elsif ($item eq 'discussion') {                                      } elsif ($item eq 'discussion') {
                                         if ($key =~ /^p(lc|ch)\.roles\.denied/) {                                          if ($key =~ /^p(lc|ch|ac)\.roles\.denied/) {
                                             $displayname = &mt("$text (role-based)");                                              $displayname = &mt("$text (role-based)");
                                             if ($displayval ne '') {                                              if ($displayval ne '') {
                                                 my @roles = split(',',$displayval);                                                  my @roles = split(',',$displayval);
                                                 @roles = map { &Apache::lonnet::plaintext($_); } @roles;                                                  @roles = map { &Apache::lonnet::plaintext($_); } @roles;
                                                 $displayval = join(', ',@roles);                                                  $displayval = join(', ',@roles);
                                             }                                               } 
                                         } elsif ($key =~ /^p(lc|ch)\.users\.denied/) {                                          } elsif ($key =~ /^p(lc|ch|ac)\.users\.denied/) {
                                             $displayname = &mt("$text (specific user(s))");                                              $displayname = &mt("$text (specific user(s))");
                                         } else {                                          } else {
                                             if ($key eq 'allow_discussion_post_editing') {                                              if ($key eq 'allow_discussion_post_editing') {
Line 5298  sub update_releasereq { Line 5298  sub update_releasereq {
         }          }
         $modified_courses = [];          $modified_courses = [];
     }      }
     undef($registered_cleanup);      return OK;
     return;  
 }  }
   
 sub show_autocoowners {  sub show_autocoowners {

Removed from v.1.131  
changed lines
  Added in v.1.133


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