loncom/lond - diff

Return to lond CVS log

Up to [LON-CAPA] / loncom

version 1.569, 2021/10/26 15:52:55	version 1.571, 2021/12/21 13:57:47
Line 2036 sub read_lonnet_global {	Line 2036 sub read_lonnet_global {
}	}
if ($what eq 'perlvar') {	if ($what eq 'perlvar') {
if (!exists($packagevars{$what}{'lonBalancer'})) {	if (!exists($packagevars{$what}{'lonBalancer'})) {
if ($dist =~ /^(centos\|rhes\|fedora\|scientific\|oracle)/) {	if ($dist =~ /^(centos\|rhes\|fedora\|scientific\|oracle\|rocky\|alma)/) {
my $othervarref=LONCAPA::Configuration::read_conf('httpd.conf');	my $othervarref=LONCAPA::Configuration::read_conf('httpd.conf');
if (ref($othervarref) eq 'HASH') {	if (ref($othervarref) eq 'HASH') {
$items->{'lonBalancer'} = $othervarref->{'lonBalancer'};	$items->{'lonBalancer'} = $othervarref->{'lonBalancer'};
Line 7802 sub make_new_child {	Line 7802 sub make_new_child {
&Authen::Krb5::init_context();	&Authen::Krb5::init_context();

my $no_ets;	my $no_ets;
if ($dist =~ /^(?:centos\|rhes\|scientific\|oracle)(\d+)$/) {	if ($dist =~ /^(?:centos\|rhes\|scientific\|oracle\|rocky\|alma)(\d+)/) {
if ($1 >= 7) {	if ($1 >= 7) {
$no_ets = 1;	$no_ets = 1;
}	}