summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJesse Luehrs <doy@tozt.net>2011-04-14 00:38:58 -0500
committerJesse Luehrs <doy@tozt.net>2011-04-14 00:38:58 -0500
commit2a98b4ece0b65405252da1ed51832c9497f4d8ad (patch)
treeac9496439bdb0dfe68386d15ba86736b88ac2bbb
parent18bc512e9bf85b9e3d99015247bb143185c635fc (diff)
downloadapp-termcast-2a98b4ece0b65405252da1ed51832c9497f4d8ad.tar.gz
app-termcast-2a98b4ece0b65405252da1ed51832c9497f4d8ad.zip
update the tests to properly send login acknowledgement
-rw-r--r--t/01-basic.t1
-rw-r--r--t/02-read-write.t1
-rw-r--r--t/03-write-to-termcast.t1
3 files changed, 3 insertions, 0 deletions
diff --git a/t/01-basic.t b/t/01-basic.t
index 7dd9a7e..ea2ae54 100644
--- a/t/01-basic.t
+++ b/t/01-basic.t
@@ -34,6 +34,7 @@ EOF
my $login;
$client->recv($login, 4096);
is($login, "hello test tset\n", 'got the correct login info');
+ $client->send("hello, test\n");
my $output;
$client->recv($output, 4096);
is($output, "foo", 'sent the right data to the server');
diff --git a/t/02-read-write.t b/t/02-read-write.t
index a03effb..a30fce4 100644
--- a/t/02-read-write.t
+++ b/t/02-read-write.t
@@ -42,6 +42,7 @@ EOF
my $login;
$client->recv($login, 4096);
is($login, "hello test tset\n", 'got the correct login info');
+ $client->send("hello, test\n");
my $output;
my $total_out = '';
while (1) {
diff --git a/t/03-write-to-termcast.t b/t/03-write-to-termcast.t
index 04045cf..db9cfca 100644
--- a/t/03-write-to-termcast.t
+++ b/t/03-write-to-termcast.t
@@ -30,6 +30,7 @@ test_tcp(
my $login;
$client->recv($login, 4096);
is($login, "hello test tset\n", 'got the correct login info');
+ $client->send("hello, test\n");
my $buf;
$client->recv($buf, 4096);
is($buf, 'foo', 'wrote correctly');