X-Git-Url: http://www.git.stargrave.org/?p=public-inbox.git;a=blobdiff_plain;f=lib%2FPublicInbox%2FMsgmap.pm;h=c6a73155401b9bb3c1c6fd4c5adedddb79a01bbf;hp=26565d456b6c5d4b5d0ce320297dcb8e4ee5d7e2;hb=b8c41362f2a5c8fcc6b1846a79c72bfa77565297;hpb=445d2062a60959a04b55d7d1fe4439eff23cd44d diff --git a/lib/PublicInbox/Msgmap.pm b/lib/PublicInbox/Msgmap.pm index 26565d45..c6a73155 100644 --- a/lib/PublicInbox/Msgmap.pm +++ b/lib/PublicInbox/Msgmap.pm @@ -196,6 +196,18 @@ ORDER BY num ASC LIMIT 1000 $ids; } +sub msg_range { + my ($self, $beg, $end) = @_; + my $dbh = $self->{dbh}; + my $attr = { Columns => [] }; + my $mids = $dbh->selectall_arrayref(<<'', $attr, $$beg, $end); +SELECT num,mid FROM msgmap WHERE num >= ? AND num <= ? +ORDER BY num ASC + + $$beg = $mids->[-1]->[0] + 1 if @$mids; + $mids +} + # only used for mapping external serial numbers (e.g. articles from gmane) # see scripts/xhdr-num2mid or PublicInbox::Filter::RubyLang for usage sub mid_set {