diff options
author | Eric Wong <e@80x24.org> | 2016-05-29 04:10:48 +0000 |
---|---|---|
committer | Eric Wong <e@80x24.org> | 2016-05-29 04:11:34 +0000 |
commit | 9665b1ffe0c5417e54ccd313794577d7c62c429c (patch) | |
tree | 74396a3598b8f44317c50213994307fd4e098ad8 /t | |
parent | 6a36a397b2f888d1c5981143e0901b447e77280a (diff) | |
download | public-inbox-9665b1ffe0c5417e54ccd313794577d7c62c429c.tar.gz |
Oops, we totally forgot to automate testing for this :x
Diffstat (limited to 't')
-rw-r--r-- | t/nntpd.t | 8 |
1 files changed, 8 insertions, 0 deletions
@@ -173,6 +173,14 @@ EOF $len, '1' ] }, "XOVER by article works"); + is_deeply($n->head(1), $n->head('<nntp@example.com>'), 'HEAD OK'); + is_deeply($n->body(1), $n->body('<nntp@example.com>'), 'BODY OK'); + my $art = $n->article(1); + is(ref($art), 'ARRAY', 'got array for ARTICLE'); + is_deeply($art, $n->article('<nntp@example.com>'), 'ARTICLE OK'); + is($n->article(999), undef, 'non-existent num'); + is($n->article('<non-existent@example>'), undef, 'non-existent mid'); + { syswrite($s, "OVER $mid\r\n"); $buf = read_til_dot($s); |