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

Diff for /loncom/interface/lonconfigsettings.pm between versions 1.48 and 1.51

version 1.48, 2021/04/19 14:11:16 version 1.51, 2021/08/04 20:10:34
Line 355  sub make_changes { Line 355  sub make_changes {
        {href=>"javascript:changePage(document.$phase,'$phase')",         {href=>"javascript:changePage(document.$phase,'$phase')",
         text=>"Updated"});          text=>"Updated"});
     &print_header($r,$phase,$context,undef,$container);      &print_header($r,$phase,$context,undef,$container);
     my ($crstype,%lastact);      my ($crstype,%lastact,$errors);
     if ($context eq 'course') {      if ($context eq 'course') {
         $crstype = &Apache::loncommon::course_type();          $crstype = &Apache::loncommon::course_type();
     }      }
Line 369  sub make_changes { Line 369  sub make_changes {
                                           $confname,$item,$roles,$values,\%lastact));                                            $confname,$item,$roles,$values,\%lastact));
                 } else {                  } else {
                     $changes{$item} = {};                      $changes{$item} = {};
                     &Apache::courseprefs::process_changes($dom,$item,$values,                      $errors =
                                                           $prefs->{$item},$changes{$item},                          &Apache::courseprefs::process_changes($dom,$confname,$item,$values,
                                                           $allitems,\%disallowed,$crstype);                                                                $prefs->{$item},$changes{$item},
                                                                 $allitems,\%disallowed,$crstype);
                     if (keys(%{$changes{$item}}) > 0) {                      if (keys(%{$changes{$item}}) > 0) {
                         $numchanged ++;                          $numchanged ++;
                     }                      }
Line 403  sub make_changes { Line 404  sub make_changes {
             }              }
             $r->print('</p>');              $r->print('</p>');
         }          }
           if ($errors) {
               $r->print('<p>'.$errors.'</p>');
           }
     }      }
     $r->print('<p>');      $r->print('<p>');
     my $footer_text = 'Back to configuration display';      my $footer_text = 'Back to configuration display';
Line 559  sub display_choices { Line 563  sub display_choices {
                 $thirddiv = 1;                  $thirddiv = 1;
             }              }
         }          }
         $r->print('</div><br clear="all" />');  
     }      }
       $r->print('</div><div style="padding:0;clear:both;margin:0;border:0"></div>');
     $r->print(&print_footer($r,$phase,'display','Display',undef,$container,$parm_permission));      $r->print(&print_footer($r,$phase,'display','Display',undef,$container,$parm_permission));
     $r->print('</form>');      $r->print('</form>');
     if ($container) {      if ($container) {
Removed from v.1.48  
changed lines
  Added in v.1.51

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