use strict;
require Exporter;
-use C4::Context("/etc/koha.conf.tmpXX");
+use C4::Context("/etc/koha.conf.tmp");
use C4::Catalogue;
use C4::Biblio;
use MARC::Record;
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");