diff options
Diffstat (limited to '')
| -rwxr-xr-x | testing/tests/001-basic.t (renamed from testing/test3.pl) | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/testing/test3.pl b/testing/tests/001-basic.t index 57be5ed..4373855 100755 --- a/testing/test3.pl +++ b/testing/tests/001-basic.t @@ -5,7 +5,7 @@ use warnings; use feature qw/say/; -use lib 'blib/lib'; +#use lib 'blib/lib'; use Test::Irssi; @@ -14,8 +14,10 @@ my $tester = Test::Irssi->new irssi_homedir => $ENV{HOME} . "/projects/tmp/test/irssi-debug"); say "Created test instance"; +$tester->run_headless(1); my $test = $tester->new_test('test1'); +$test->description("simple echo tests"); $test->add_input_sequence("/echo Hello cats\n"); $test->add_delay(1); @@ -26,6 +28,8 @@ $test->add_pattern_match(qw/longfdajkfd/, 'prompt', 'prompt contains hello'); my $test2 = $tester->new_test('test2'); +$test2->description("cursor movement and deletion"); + $test2->add_delay(2); $test2->add_input_sequence("\x01"); $test2->add_delay(0.1); @@ -36,6 +40,7 @@ $test2->add_delay(0.1); $test2->add_input_sequence("/echo moo\n"); my $quit = $tester->new_test('quit'); +$quit->description('quitting'); $quit->add_input_sequence("/quit\n"); # for (1..10) { |