loncom/metadata_database/cleanup_database.pl - diff

Return to cleanup_database.pl CVS log

Up to [LON-CAPA] / loncom / metadata_database

version 1.1, 2002/07/25 15:31:10	version 1.2, 2002/09/09 14:01:04
Line 103 ENDHELP	Line 103 ENDHELP
}	}

# --------------- Read loncapa_apache.conf and loncapa.conf and get variables	# --------------- Read loncapa_apache.conf and loncapa.conf and get variables
my %perlvar = %{&LONCAPA::Configuration::read_conf('loncapa_apache.conf',	my %perlvar = %{&LONCAPA::Configuration::read_conf('loncapa.conf')};
'loncapa.conf')};
delete $perlvar{'lonReceipt'}; # remove since sensitive and not needed	delete $perlvar{'lonReceipt'}; # remove since sensitive and not needed

my $dbh;	my $dbh;