scripts/dupe-finder: restore $dbh variable

When dupe-finder was switched from ->search->{over_ro} to ->over, the
database handle was dropped.  Restore it because a spot downstream
uses it.

Fixes: 73e3a6ed6e95adc6 (use more idiomatic internal API for ->over access)
(cherry picked from commit 0438ee2b1a5fbeb587ee62aa3e267ec09d281bd9)

diff --git a/scripts/dupe-finder b/scripts/dupe-finder
index 7b490cbbc3fcc0c61f97c3e441b9a9d253ddc9de..deeb0d6f853510459d1b5ffd12c8c407d15d6b46 100644 (file)
--- a/scripts/dupe-finder
+++ b/scripts/dupe-finder
@@ -22,6 +22,7 @@ if (index($repo, '@') > 0) {
 $ibx or die "No inbox";
 $ibx->search or die "search not available for inbox";
 my $over = $ibx->over;
+my $dbh = $over->dbh;
 
 sub emit ($) {
        my ($nums) = @_;