diff options
| -rw-r--r-- | lib/PublicInbox/NNTP.pm | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/lib/PublicInbox/NNTP.pm b/lib/PublicInbox/NNTP.pm index 142bee39..12760394 100644 --- a/lib/PublicInbox/NNTP.pm +++ b/lib/PublicInbox/NNTP.pm @@ -25,6 +25,8 @@ sub now () { clock_gettime(CLOCK_MONOTONIC) }; my @OVERVIEW = qw(Subject From Date Message-ID References Bytes Lines); my $OVERVIEW_FMT = join(":\r\n", @OVERVIEW) . ":\r\n"; +my $LIST_HEADERS = join("\r\n", qw(Subject From Date Message-ID References + :bytes :lines Xref To Cc)) . "\r\n"; # disable commands with easy DoS potential: # LISTGROUP could get pretty bad, too... @@ -95,6 +97,11 @@ sub list_overview_fmt ($) { do_more($self, $OVERVIEW_FMT); } +sub list_headers ($;$) { + my ($self) = @_; + do_more($self, $LIST_HEADERS); +} + sub list_active ($;$) { my ($self, $wildmat) = @_; wildmat2re($wildmat); |