diff options
author | Jesse Luehrs <doy@tozt.net> | 2014-09-15 23:56:48 -0400 |
---|---|---|
committer | Jesse Luehrs <doy@tozt.net> | 2014-09-15 23:56:48 -0400 |
commit | df4fe706e4124d3cc12dfd3ae106b515d5b66693 (patch) | |
tree | 921a34cf79a8e1d42a78ef3117873669a35b6f93 | |
parent | b03191a3e21aef68ae293fa38aa26174a3a15031 (diff) | |
download | app-termcast-df4fe706e4124d3cc12dfd3ae106b515d5b66693.tar.gz app-termcast-df4fe706e4124d3cc12dfd3ae106b515d5b66693.zip |
fix tests
-rw-r--r-- | t/basic.t | 2 | ||||
-rw-r--r-- | t/read-write.t | 2 | ||||
-rw-r--r-- | t/write-to-termcast.t | 2 |
3 files changed, 3 insertions, 3 deletions
@@ -52,7 +52,7 @@ EOF my $client = $sock->accept; { sysread($sread, my $buf, 1) } is(full_read($client), - "hello test tset\n\e\[H\x00{\"geometry\":[80,24]}\xff\e\[H\e\[2J", + "hello test tset\n\e\]499;{\"geometry\":[80,24]}\x07", "got the correct login info"); $client->send("hello, test\n"); is(full_read($client), "foo"); diff --git a/t/read-write.t b/t/read-write.t index 52ed8e9..fe945dc 100644 --- a/t/read-write.t +++ b/t/read-write.t @@ -72,7 +72,7 @@ EOF my $client = $sock->accept; { sysread($sread, my $buf, 1) } is(full_read($client), - "hello test tset\n\e\[H\x00{\"geometry\":[80,24]}\xff\e\[H\e\[2J", + "hello test tset\n\e\]499;{\"geometry\":[80,24]}\x07", "got the correct login info"); $client->send("hello, test\n"); diff --git a/t/write-to-termcast.t b/t/write-to-termcast.t index 2be2c36..afd4f19 100644 --- a/t/write-to-termcast.t +++ b/t/write-to-termcast.t @@ -44,7 +44,7 @@ test_tcp( syswrite($swrite, 'a'); my $client = $sock->accept; is(full_read($client), - "hello test tset\n\e\[H\x00{\"geometry\":[80,24]}\xff\e\[H\e\[2J", + "hello test tset\n\e\]499;{\"geometry\":[80,24]}\x07", "got the correct login info"); $client->send("hello, test\n"); { sysread($sread, my $buf, 1) } |