about summary refs log tree commit homepage
path: root/lib/PublicInbox/OverIdx.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/PublicInbox/OverIdx.pm')
-rw-r--r--lib/PublicInbox/OverIdx.pm14
1 files changed, 14 insertions, 0 deletions
diff --git a/lib/PublicInbox/OverIdx.pm b/lib/PublicInbox/OverIdx.pm
index e8df01c4..01ca6f11 100644
--- a/lib/PublicInbox/OverIdx.pm
+++ b/lib/PublicInbox/OverIdx.pm
@@ -337,6 +337,20 @@ sub remove_oid {
         $nr;
 }
 
+sub num_mid0_for_oid {
+        my ($self, $oid, $mid) = @_;
+        my ($num, $mid0);
+        $self->begin_lazy;
+        each_by_mid($self, $mid, ['ddd'], sub {
+                my ($smsg) = @_;
+                my $blob = $smsg->{blob};
+                return 1 if (!defined($blob) || $blob ne $oid); # continue;
+                ($num, $mid0) = ($smsg->{num}, $smsg->{mid});
+                0; # done
+        });
+        ($num, $mid0);
+}
+
 sub create_tables {
         my ($dbh) = @_;