diff options
Diffstat (limited to 'infra')
-rwxr-xr-x | infra/dgit-repos-policy-debian | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/infra/dgit-repos-policy-debian b/infra/dgit-repos-policy-debian index 5d843a0..a770c55 100755 --- a/infra/dgit-repos-policy-debian +++ b/infra/dgit-repos-policy-debian @@ -462,6 +462,10 @@ for (;;) { 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; |