diff options
| -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) } |