#!/usr/bin/perl -w
# Copyright (C) 2015 all contributors <meta@public-inbox.org>
# License: AGPLv3 or later (https://www.gnu.org/licenses/agpl-3.0.txt)
+#
+# Standalone NNTP server for public-inbox.
use strict;
use warnings;
require PublicInbox::Daemon;
require PublicInbox::Config;
my $nntpd = PublicInbox::NNTPD->new;
daemon_run('0.0.0.0:119',
- sub { $nntpd->refresh_groups },
- sub ($) { PublicInbox::NNTP->new($_[0], $nntpd) });
+ sub { $nntpd->refresh_groups }, # refresh
+ sub ($$$) { PublicInbox::NNTP->new($_[0], $nntpd) }); # post_accept
1;
package PublicInbox::NNTPD;