diff options
Diffstat (limited to 't/002-read-write.t')
-rw-r--r-- | t/002-read-write.t | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/t/002-read-write.t b/t/002-read-write.t index 153f8c6..a03effb 100644 --- a/t/002-read-write.t +++ b/t/002-read-write.t @@ -17,9 +17,8 @@ test_tcp( use App::Termcast; my \$tc = App::Termcast->new( host => '127.0.0.1', port => $port, - user => 'test', password => 'tset', - extra_argv => ['$^X', "-e", "while (<>) { last if /\\\\./; print }"]); - \$tc->run; + user => 'test', password => 'tset'); + \$tc->run('$^X', "-e", "while (<>) { last if /\\\\./; print }"); EOF my $pty = IO::Pty::Easy->new; $pty->spawn("$^X", "-e", $client_script); |