nntpd: better encapsulation for shutdown

We can use the UNIVERSAL::can to better encapsulate the shutdown
process, in case we need to implement a gopher or HTTP daemon.

diff --git a/public-inbox-nntpd b/public-inbox-nntpd
index 70bab46f304bc121ef1bf62b570665f79c0a669d..9fb69cec67ef7bc8544aea3c195503d1e4cd0453 100644 (file)
--- a/public-inbox-nntpd
+++ b/public-inbox-nntpd
@@ -204,8 +204,7 @@ sub worker_quit {
                my $n = 0;
 
                foreach my $s (values %$dmap) {
-                       next unless ref($s) eq 'PublicInbox::NNTP';
-                       if ($s->busy) {
+                       if ($s->can('busy') && $s->busy) {
                                ++$n;
                        } else {
                                $s->close;