diff options
| author | Jason May <jason.a.may@gmail.com> | 2011-03-10 12:21:08 -0500 |
|---|---|---|
| committer | Jesse Luehrs <doy@tozt.net> | 2011-04-14 01:19:03 -0500 |
| commit | f571d1e6cb78d873b28248291e80076932ef98fc (patch) | |
| tree | f5f155fd2428a28380cb7a070d9f523cf01fb801 /t/03-write-to-termcast.t | |
| parent | a598a9e3e879e0d24e23d9d22a65191706e64f4a (diff) | |
| download | app-termcast-f571d1e6cb78d873b28248291e80076932ef98fc.tar.gz app-termcast-f571d1e6cb78d873b28248291e80076932ef98fc.zip | |
update tests
Diffstat (limited to 't/03-write-to-termcast.t')
| -rw-r--r-- | t/03-write-to-termcast.t | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/t/03-write-to-termcast.t b/t/03-write-to-termcast.t index db9cfca..852c5f4 100644 --- a/t/03-write-to-termcast.t +++ b/t/03-write-to-termcast.t @@ -31,6 +31,10 @@ test_tcp( $client->recv($login, 4096); is($login, "hello test tset\n", 'got the correct login info'); $client->send("hello, test\n"); + + # skip over metadata - tested in 01-basic.t + $client->recv(my $metadata, 4096); + my $buf; $client->recv($buf, 4096); is($buf, 'foo', 'wrote correctly'); |