return "$repos/policy.sqlite3";
}
-sub poldb_setup ($) {
- my ($policydb) = @_;
+sub poldb_setup ($;$) {
+ my ($policydb, $hook) = @_;
$poldbh ||= DBI->connect("dbi:SQLite:$policydb",'','', {
RaiseError=>1, PrintError=>1, AutoCommit=>0
});
+
+ $hook->() if $hook;
+
$poldbh->do("PRAGMA foreign_keys = ON");
}