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

Diff for /loncom/interface/lonmodifycourse.pm between versions 1.99 and 1.101

version 1.99, 2023/04/11 20:35:19 version 1.101, 2023/07/29 20:33:25
Line 609  sub print_modification_menu { Line 609  sub print_modification_menu {
                   '<li>'.$setuploadquota_text.'</li>'."\n".                    '<li>'.$setuploadquota_text.'</li>'."\n".
                   '<li>'.$anon_text.'</li>'."\n".                    '<li>'.$anon_text.'</li>'."\n".
                   '<li>'.$postsubmit_text.'</li>'."\n".                    '<li>'.$postsubmit_text.'</li>'."\n".
                   '<li>'.$ltiauth_text.'</li>'."\n";                    '<li>'.$ltiauth_text.'</li>'."\n".
                   '<li>'.$exttool_text.'</li>'."\n";                    '<li>'.$exttool_text.'</li>'."\n";
     my ($categories_link_start,$categories_link_end);      my ($categories_link_start,$categories_link_end);
     if ($permission->{'catsettings'} eq 'edit') {      if ($permission->{'catsettings'} eq 'edit') {
Line 795  sub print_setquota { Line 795  sub print_setquota {
                                         $cdom,$cnum);                                          $cdom,$cnum);
     my $coursequota = $settings{'internal.coursequota'};      my $coursequota = $settings{'internal.coursequota'};
     my $uploadquota = $settings{'internal.uploadquota'};      my $uploadquota = $settings{'internal.uploadquota'};
     if ($coursequota eq '') {      if (($uploadquota eq '') || ($coursequota eq '')) {
         $coursequota = $staticdefaults{'coursequota'};  
     }  
     if ($uploadquota eq '') {  
         my %domdefs = &Apache::lonnet::get_domain_defaults($cdom);          my %domdefs = &Apache::lonnet::get_domain_defaults($cdom);
         my $quotatype = &Apache::lonuserutils::get_extended_type($cdom,$cnum,$type,\%settings);          my $quotatype = &Apache::lonuserutils::get_extended_type($cdom,$cnum,$type,\%settings);
         $uploadquota = $domdefs{$quotatype.'quota'};  
         if ($uploadquota eq '') {          if ($uploadquota eq '') {
             $uploadquota = $staticdefaults{'uploadquota'};              $uploadquota = $domdefs{$quotatype.'quota'};
               if ($uploadquota eq '') {
                   $uploadquota = $staticdefaults{'uploadquota'};
               }
           }
           if ($coursequota eq '') {
               $coursequota = $domdefs{$quotatype.'coursequota'};
               if ($coursequota eq '') {
                   $coursequota = $staticdefaults{'coursequota'};
               }
         }          }
     }      }
     &print_header($r,$type);      &print_header($r,$type);
Line 2732  ENDJS Line 2737  ENDJS
         $js .= <<"ENDSCRIPT";          $js .= <<"ENDSCRIPT";
   
 function verify_quota() {  function verify_quota() {
     var newquota = document.setquota.coursequota.value;       var newcoursequota = document.setquota.coursequota.value;
       var newuploadquota = document.setquota.uploadquota.value;
     var num_reg = $regexp;      var num_reg = $regexp;
     if (num_reg.test(newquota)) {      if ((num_reg.test(newcoursequota)) && (num_reg.test(newuploadquota))) {
         changePage(document.setquota,'processquota');          changePage(document.setquota,'processquota');
     } else {      } else {
         alert("$invalid\\n$alert");          alert("$invalid\\n$alert");
Removed from v.1.99  
changed lines
  Added in v.1.101

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