use strict;
require Exporter;
-use C4::Context;
+use C4::Context("/etc/koha.conf.tmp");
use C4::Catalogue;
use C4::Biblio;
use MARC::Record;
#die;
my $dbh = C4::Context->dbh;
+my $sth = $dbh->prepare("select * from systempreferences");
+$sth->execute;
$dbh->do("delete from marc_biblio");
$dbh->do("delete from marc_blob_subfield");
$dbh->do("delete from marc_subfield_table");