uses temp koha.conf file by default

This commit is contained in:
tipaul 2002-12-20 13:55:01 +00:00
parent 40d6ddb383
commit ccc963ab56

View file

@ -22,7 +22,7 @@ package C4::test;
use strict;
require Exporter;
use C4::Context;
use C4::Context("/etc/koha.conf.tmpXX");
use C4::Catalogue;
use C4::Biblio;
use MARC::Record;
@ -30,6 +30,10 @@ use MARC::File::USMARC;
#die;
my $dbh = C4::Context->dbh;
my $sth = $dbh->prepare("select * from systempreferences");
$sth->execute;
print "connecté\n";
die;
$dbh->do("delete from marc_biblio");
$dbh->do("delete from marc_blob_subfield");
$dbh->do("delete from marc_subfield_table");