--- loncom/metadata_database/cleanup_database.pl	2002/07/25 15:31:10	1.1
+++ loncom/metadata_database/cleanup_database.pl	2002/09/09 14:01:04	1.2
@@ -2,7 +2,7 @@
 # The LearningOnline Network
 # searchcat.pl "Search Catalog" batch script
 #
-# $Id: cleanup_database.pl,v 1.1 2002/07/25 15:31:10 matthew Exp $
+# $Id: cleanup_database.pl,v 1.2 2002/09/09 14:01:04 harris41 Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -103,8 +103,7 @@ ENDHELP
 }
 
 # ---------------  Read loncapa_apache.conf and loncapa.conf and get variables
-my %perlvar = %{&LONCAPA::Configuration::read_conf('loncapa_apache.conf',
-                                                   'loncapa.conf')};
+my %perlvar = %{&LONCAPA::Configuration::read_conf('loncapa.conf')};
 delete $perlvar{'lonReceipt'}; # remove since sensitive and not needed
 
 my $dbh;