Diff for /loncom/interface/domainprefs.pm between versions 1.399 and 1.400

version 1.399, 2021/12/28 02:04:35 version 1.400, 2021/12/28 03:26:44
Line 3880  sub print_autoenroll { Line 3880  sub print_autoenroll {
         if (exists($settings->{'failsafe'})) {          if (exists($settings->{'failsafe'})) {
             $failsafe = $settings->{'failsafe'};              $failsafe = $settings->{'failsafe'};
             if ($failsafe eq 'zero') {              if ($failsafe eq 'zero') {
                 $failsafechecked{'zero'} = ' checked="checked"';                   $failsafechecked{'zero'} = ' checked="checked"';
                 $failsafechecked{'off'} = '';                  $failsafechecked{'off'} = '';
                 $failsafesty = 'inline-block';                  $failsafesty = 'inline-block';
             } elsif ($failsafe eq 'any') {              } elsif ($failsafe eq 'any') {
Line 3893  sub print_autoenroll { Line 3893  sub print_autoenroll {
             if ($autofailsafe ne '') {              if ($autofailsafe ne '') {
                 $failsafechecked{'zero'} = ' checked="checked"';                  $failsafechecked{'zero'} = ' checked="checked"';
                 $failsafe = 'zero';                  $failsafe = 'zero';
                 $failsafechecked{'off'} = '';                   $failsafechecked{'off'} = '';
             }              }
         }          }
     } else {      } else {
Line 3933  sub print_autoenroll { Line 3933  sub print_autoenroll {
                   $coownersoff.' value="0" />'.&mt('No').'</label></span></td>'.                    $coownersoff.' value="0" />'.&mt('No').'</label></span></td>'.
                   '</tr><tr>'.                    '</tr><tr>'.
                   '<td>'.&mt('Failsafe for no drops when institutional data missing').'</td>'.                    '<td>'.&mt('Failsafe for no drops when institutional data missing').'</td>'.
                   '<td class="LC_right_item"><span class="LC_nobreak">'.                    '<td class="LC_left_item"><span class="LC_nobreak">'.
                   '<span class="LC_nobreak"><label><input type="radio name="autoenroll_failsafe" value="off" onclick="toggleFailsafe(this.form)" />'.&mt('Not in use').'</label></span><br />'.                    '<span class="LC_nobreak"><label><input type="radio" name="autoenroll_failsafe" value="off" onclick="toggleFailsafe(this.form)"'.$failsafechecked{'off'}.' />'.&mt('Not in use').'</label></span>&nbsp;&nbsp;&nbsp; '.
                   '<span class="LC_nobreak"><label><input type="radio name="autoenroll_failsafe" value="zero" onclick="toggleFailsafe(this.form)" />'.&mt('Retrieved section enrollment is zero').'</label></span><br />'.                    '<span class="LC_nobreak"><label><input type="radio" name="autoenroll_failsafe" value="zero" onclick="toggleFailsafe(this.form)"'.$failsafechecked{'zero'}.' />'.&mt('Retrieved section enrollment is zero').'</label></span><br />'.
                   '<span class="LC_nobreak"><label><input type="radio name="autoenroll_failsafe" value="any" onclick="toggleFailsafe(this.form)" />'.&mt('Retrieved section enrollment is zero or greater').'</label></span>'.                    '<span class="LC_nobreak"><label><input type="radio" name="autoenroll_failsafe" value="any" onclick="toggleFailsafe(this.form)"'.$failsafechecked{'any'}.' />'.&mt('Retrieved section enrollment is zero or greater').'</label></span>'.
                   '<div class="LC_floatleft" style="display:'.$failsafesty.';" id="autoenroll_failsafe_div">'.                    '<div class="LC_floatleft" style="display:'.$failsafesty.';" id="autoenroll_failsafe_div">'.
                   '<span class="LC_nobreak">'.                    '<span class="LC_nobreak">'.
                   &mt('Threshold for number of students in section to drop: [_1]',                    &mt('Threshold for number of students in section to drop: [_1]',
Line 16000  sub modify_autoenroll { Line 16000  sub modify_autoenroll {
     my $failsafe = $env{'form.autoenroll_failsafe'};      my $failsafe = $env{'form.autoenroll_failsafe'};
     unless (($failsafe eq 'zero') || ($failsafe eq 'any')) {      unless (($failsafe eq 'zero') || ($failsafe eq 'any')) {
         $failsafe = 'off';          $failsafe = 'off';
         undef($autofailsafe);                undef($autofailsafe);
     }      }
     my %autoenrollhash =  (      my %autoenrollhash =  (
                        autoenroll => { 'run' => $env{'form.autoenroll_run'},                         autoenroll => { 'run' => $env{'form.autoenroll_run'},
Line 16008  sub modify_autoenroll { Line 16008  sub modify_autoenroll {
                                        'sender_domain' => $sender_domain,                                         'sender_domain' => $sender_domain,
                                        'co-owners' => $coowners,                                         'co-owners' => $coowners,
                                        'autofailsafe' => $autofailsafe,                                         'autofailsafe' => $autofailsafe,
                                        'failsafe' => $failsafe,                                          'failsafe' => $failsafe,
                                 }                                  }
                      );                       );
     my $putresult = &Apache::lonnet::put_dom('configuration',\%autoenrollhash,      my $putresult = &Apache::lonnet::put_dom('configuration',\%autoenrollhash,

Removed from v.1.399  
changed lines
  Added in v.1.400


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