doc/loncapafiles/updatequery.piml - diff

Return to updatequery.piml CVS log

Up to [LON-CAPA] / doc / loncapafiles

version 1.57, 2007/05/22 22:49:27	version 1.59, 2007/12/07 06:01:06
Line 477 END	Line 477 END

# update loncapa.conf	# update loncapa.conf
my $confdir = '/etc/httpd/conf/';	my $confdir = '/etc/httpd/conf/';
if ('<DIST />' eq 'sles10' \|\| '<DIST />' eq 'suse10.1' \|\| '<DIST />' eq 'suse10.2') {	if ('<DIST />' eq 'sles10' \|\| '<DIST />' eq 'suse10.1' \|\| '<DIST />' eq 'suse10.2' \|\| '<DIST />' eq 'suse10.3') {
$confdir = '/etc/apache2/';	$confdir = '/etc/apache2/';
}	}
my $filename='loncapa.conf';	my $filename='loncapa.conf';
Line 534 END	Line 534 END
</file>	</file>
<file>	<file>
<target dist='default'>/etc/httpd/conf/</target>	<target dist='default'>/etc/httpd/conf/</target>
<target dist='sles10 suse10.1 suse10.2'>/etc/apache2/</target>	<target dist='sles10 suse10.1 suse10.2 suse10.3'>/etc/apache2/</target>
<perlscript mode='fg'>	<perlscript mode='fg'>
sub securesetting {	sub securesetting {
my (%perlvar)=@_;	my (%perlvar)=@_;
Line 655 my %perlvarstatic;	Line 655 my %perlvarstatic;
push(@libservers,$1);	push(@libservers,$1);
}	}
}	}
	# make list unique
	@libservers = keys(%{{ map { $_ => 1 } (@libservers) }});
close(IN);	close(IN);
if (@libservers == 1) {	if (@libservers == 1) {
$primaryLibServer = $libservers[0];	$primaryLibServer = $libservers[0];