--- loncom/metadata_database/searchcat.pl 2002/05/11 21:28:20 1.17 +++ loncom/metadata_database/searchcat.pl 2002/05/17 14:03:04 1.18 @@ -2,7 +2,7 @@ # The LearningOnline Network # searchcat.pl "Search Catalog" batch script # -# $Id: searchcat.pl,v 1.17 2002/05/11 21:28:20 harris41 Exp $ +# $Id: searchcat.pl,v 1.18 2002/05/17 14:03:04 matthew Exp $ # # Copyright Michigan State University Board of Trustees # @@ -55,8 +55,9 @@ sub wanted { push(@metalist,"$dir/$_"); } -# ------------------------- Read access.conf and loncapa.conf and get variables -my $perlvarref=LONCAPA::Configuration::read_conf('access.conf','loncapa.conf'); +# --------------- Read loncapa_apache.conf and loncapa.conf and get variables +my $perlvarref=LONCAPA::Configuration::read_conf('loncapa_apache.conf', + 'loncapa.conf'); my %perlvar=%{$perlvarref}; undef $perlvarref; # remove since sensitive and not needed delete $perlvar{'lonReceipt'}; # remove since sensitive and not needed