diff options
author | Eric Wong <e@80x24.org> | 2015-09-25 02:27:51 +0000 |
---|---|---|
committer | Eric Wong <e@80x24.org> | 2015-09-25 02:29:05 +0000 |
commit | 33895202425441fb9a65a624c2d624fea026f811 (patch) | |
tree | f93b38d76d5d450591f5dee31fd309e4e291c4b3 /lib/PublicInbox | |
parent | 037145fecda6383f6d119893015c77ab4d86daf3 (diff) | |
download | public-inbox-33895202425441fb9a65a624c2d624fea026f811.tar.gz |
This is required by RFC 3977, section 3.2.1
Diffstat (limited to 'lib/PublicInbox')
-rw-r--r-- | lib/PublicInbox/NNTP.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/PublicInbox/NNTP.pm b/lib/PublicInbox/NNTP.pm index c2f97177..dd033e89 100644 --- a/lib/PublicInbox/NNTP.pm +++ b/lib/PublicInbox/NNTP.pm @@ -123,14 +123,14 @@ sub list_newsgroups ($;$) { } } -# LIST SUBSCRIPTIONS not supported +# LIST SUBSCRIPTIONS, DISTRIB.PATS are not supported sub cmd_list ($;$$) { my ($self, @args) = @_; if (scalar @args) { my $arg = shift @args; $arg =~ tr/A-Z./a-z_/; $arg = "list_$arg"; - return '503 function not performed' if $DISABLED{$arg}; + return r501 if $DISABLED{$arg}; $arg = eval { no strict 'refs'; |