X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;f=scripts%2Fdupe-finder;h=04714cbd9424dd4fe341b64e4d85f1e5caf93008;hb=1e3c53a422b8d23cff961e43f77ea0a835cdef78;hp=1e98093685a5d946b7ca5fd7322b5b2a4604845d;hpb=9bd675d33ad1e49bd2ebe12a1d216216e61380de;p=public-inbox.git diff --git a/scripts/dupe-finder b/scripts/dupe-finder index 1e980936..04714cbd 100644 --- a/scripts/dupe-finder +++ b/scripts/dupe-finder @@ -1,5 +1,5 @@ #!/usr/bin/perl -w -# Copyright (C) 2018-2019 all contributors +# Copyright (C) 2018-2020 all contributors # License: AGPL-3.0+ # # ad-hoc tool for finding duplicates, unstable! @@ -14,14 +14,14 @@ my $ibx; if (index($repo, '@') > 0) { $ibx = PublicInbox::Config->new->lookup($repo); } elsif (-d $repo) { - $ibx = { mainrepo => $repo, address => 'unnamed@example.com' }; + $ibx = { inboxdir => $repo, address => 'unnamed@example.com' }; $ibx = PublicInbox::Inbox->new($ibx); } else { $ibx = PublicInbox::Config->new->lookup_name($repo); } $ibx or die "No inbox"; $ibx->search or die "search not available for inbox"; -my $dbh = $ibx->search->{over_ro}->connect; +my $dbh = $ibx->search->{over_ro}->dbh; my $over = PublicInbox::Over->new($dbh->sqlite_db_filename); sub emit ($) {