poldb_setup(poldb_path($repos));
$stderr = '';
+ eval ($ENV{'DGIT_DRS_RPD_TEST_DBLOOP_HOOK'}//'');
+ die $@ if length $@;
+ # used by tests/tests/debpolicy-dbretry
+
$poldbh->{HandleError} = sub {
return 0 unless $poldbh->err == 5; # SQLITE_BUSY, not in .pm :-(
die bless { }, $db_busy_exception;