--- loncom/interface/domainprefs.pm 2021/12/28 02:04:35 1.399
+++ loncom/interface/domainprefs.pm 2021/12/30 02:39:01 1.401
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Handler to set domain-wide configuration settings
#
-# $Id: domainprefs.pm,v 1.399 2021/12/28 02:04:35 raeburn Exp $
+# $Id: domainprefs.pm,v 1.401 2021/12/30 02:39:01 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -3880,7 +3880,7 @@ sub print_autoenroll {
if (exists($settings->{'failsafe'})) {
$failsafe = $settings->{'failsafe'};
if ($failsafe eq 'zero') {
- $failsafechecked{'zero'} = ' checked="checked"';
+ $failsafechecked{'zero'} = ' checked="checked"';
$failsafechecked{'off'} = '';
$failsafesty = 'inline-block';
} elsif ($failsafe eq 'any') {
@@ -3893,7 +3893,7 @@ sub print_autoenroll {
if ($autofailsafe ne '') {
$failsafechecked{'zero'} = ' checked="checked"';
$failsafe = 'zero';
- $failsafechecked{'off'} = '';
+ $failsafechecked{'off'} = '';
}
}
} else {
@@ -3933,10 +3933,10 @@ sub print_autoenroll {
$coownersoff.' value="0" />'.&mt('No').''.
'
'.
'
'.&mt('Failsafe for no drops when institutional data missing').'
'.
- '
'.
- ' '.
- ' '.
- ''.
+ '
'.
+ ' '.
+ ' '.
+ ''.
'
'.
''.
&mt('Threshold for number of students in section to drop: [_1]',
@@ -16000,7 +16000,7 @@ sub modify_autoenroll {
my $failsafe = $env{'form.autoenroll_failsafe'};
unless (($failsafe eq 'zero') || ($failsafe eq 'any')) {
$failsafe = 'off';
- undef($autofailsafe);
+ undef($autofailsafe);
}
my %autoenrollhash = (
autoenroll => { 'run' => $env{'form.autoenroll_run'},
@@ -16008,7 +16008,7 @@ sub modify_autoenroll {
'sender_domain' => $sender_domain,
'co-owners' => $coowners,
'autofailsafe' => $autofailsafe,
- 'failsafe' => $failsafe,
+ 'failsafe' => $failsafe,
}
);
my $putresult = &Apache::lonnet::put_dom('configuration',\%autoenrollhash,
@@ -21255,7 +21255,7 @@ sub modify_wafproxy {
}
}
$output = &mt('Changes were made to Web Application Firewall/Reverse Proxy').'
';
- foreach my $item ('alias','remoteip','ipheader','trusted','vpnint','vpnext','sslopt') {
+ foreach my $item ('alias','saml','remoteip','ipheader','trusted','vpnint','vpnext','sslopt') {
if ($changes{$item}) {
if ($item eq 'alias') {
my $numaliased = 0;