diff options
Diffstat (limited to 't/nntpd-tls.t')
-rw-r--r-- | t/nntpd-tls.t | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/t/nntpd-tls.t b/t/nntpd-tls.t index 4727ee5b..00b03b66 100644 --- a/t/nntpd-tls.t +++ b/t/nntpd-tls.t @@ -118,6 +118,8 @@ for my $args ( my $c = Net::NNTP->new($nntps_addr, %o); my $list = $c->list; is_deeply($list, $expect, 'NNTPS LIST works'); + is($c->command('QUIT')->response(), Net::Cmd::CMD_OK(), 'QUIT works'); + is(0, sysread($c, my $buf, 1), 'got EOF after QUIT'); # STARTTLS delete $o{SSL}; |