diff options
author | Eric Wong <e@80x24.org> | 2019-07-13 21:42:46 +0000 |
---|---|---|
committer | Eric Wong <e@80x24.org> | 2019-07-13 21:49:45 +0000 |
commit | 8c4505904f84411442b8b855a111da1461b57c45 (patch) | |
tree | 22df6db60cac0c5a36500cae3cf60394bca3184d /lib/PublicInbox/Msgmap.pm | |
parent | aca2d958e5bf80d19d69f66d2c1ec6809fece29a (diff) | |
download | public-inbox-8c4505904f84411442b8b855a111da1461b57c45.tar.gz |
RFC3977 6.1.2.2 LISTGROUP allows a [range] arg after [group], and supporting it allows NNTP support in neomutt to work again. Tested with NeoMutt 20170113 (1.7.2) on Debian stretch (oldstable)
Diffstat (limited to 'lib/PublicInbox/Msgmap.pm')
-rw-r--r-- | lib/PublicInbox/Msgmap.pm | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/lib/PublicInbox/Msgmap.pm b/lib/PublicInbox/Msgmap.pm index 5a89b85a..e74a3aef 100644 --- a/lib/PublicInbox/Msgmap.pm +++ b/lib/PublicInbox/Msgmap.pm @@ -211,11 +211,12 @@ ORDER BY num ASC LIMIT 1000 } sub msg_range { - my ($self, $beg, $end) = @_; + my ($self, $beg, $end, $cols) = @_; + $cols //= 'num,mid'; my $dbh = $self->{dbh}; my $attr = { Columns => [] }; - my $mids = $dbh->selectall_arrayref(<<'', $attr, $$beg, $end); -SELECT num,mid FROM msgmap WHERE num >= ? AND num <= ? + my $mids = $dbh->selectall_arrayref(<<"", $attr, $$beg, $end); +SELECT $cols FROM msgmap WHERE num >= ? AND num <= ? ORDER BY num ASC LIMIT 1000 $$beg = $mids->[-1]->[0] + 1 if @$mids; |