--- loncom/cgi/clusterstatus.pl 2002/05/11 21:29:42 1.3 +++ loncom/cgi/clusterstatus.pl 2002/09/09 14:18:56 1.4 @@ -54,8 +54,8 @@ sub connected { print "Content-type: text/html\n\n". "\n"; -# ------------------------------------------- Read access.conf and loncapa.conf -my $perlvarref=LONCAPA::Configuration::read_conf('access.conf','loncapa.conf'); +# -------------------- Read loncapa.conf (and by default, loncapa_apache.conf). +my $perlvarref=LONCAPA::Configuration::read_conf('loncapa.conf'); my %perlvar=%{$perlvarref}; undef $perlvarref; # remove since sensitive and not needed delete $perlvar{'lonReceipt'}; # remove since sensitive and not needed